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Editorial 


UNA GRAN NOTICIA 


Este mes ofrecemos una Mran nolicia a uucstros 
let-cores. A iniclariva <1^ una tie las mAs important*-, 
c rnpre >hls espariokh du soft w art, desde el primer dui 
dc muritU his pic trios dc loa video] negus eorticrciatcs 
van ■ i bajar radical me ate mi preth* 

Pin las inlarmadunes Je que dihjmniMini'S en el ntu- 
mcnlo tie ctrrflr cstc numcm, In inicintiva hn tflenn- 
Irado una aeagida pnsilu’ftcntrccl resin dg empresas 
del sct’Uir* muchasdc lascuates han anunciadu su in- 
tcnci6n dc adhcrirsc. 

Es obvio t|uc puru ruiuscnis larlorcs iJsla iid es uhli 
novedad cualquiera, pues vl- train lSc un dcscCftSo dc 
preemK qng, en elgum>s ensns. pvede snuftrloS cn inn 
sfilo iin.i cuiirta parte dc) que antes tenian en cl mer- 
cado. 

Sin embargo, las cnnsecuencias. dc cst.i medida re- 
basan cstc aspect^. nun nendo fundamental. Adenitis 
iJr acabar con un nsecaiiisrnu que nsuntcnJa los pre- 


cius arcifidalmence altos y. pot tnnto, perjndicaba dc 
forma in|i.tMiliL-;-idi& ;,l usuario, ton las nuevas tan lbs 
el mereado tenderd a -mti mas dtnjmiLO, m£is rccep- 
mo a nuevas ideas c initial iva.s y, enmo ennsetuen- 
eiiq n t spanthfsc. Hay t|uc tsperar que csUi mayor 
dema ruin red unde hcnefieiusumcnie sobre la produc¬ 
tion national dc software \ l;i induslria etc comorcia- 
Nzaeibn st- genera en torno a ella. 

Las nuevai itirifas cnlran l-ji viiyjr a parlir del 
inismn din cil que esc a let isla se pom: a Lli venca, Es- 
lamos ante una gran nrtlicia para Ids jrtvenes aft-Cin- 
nados. u Ids vldeo>ucgos y que, en mudwis eas^ns. no 
dispomun del node: adquisitivo necesarlo. 

Sin JulJ.l, entm- usuurios. pmduclores y distribui- 
do res esjsle amdeneia dc qug la pruduction inlcrna 
de software neoestlabn dc csle lipo dc medidas pnra 
destirrull.iive '. uhiirtdOflai su L-stadi] dc dcpL'fidCflCiJi. 

F.spcremos qut asf sea. 


LOS MEJORES DE INPUT 


Nemos pensadn que es KMeressple dispone: nr? un ranking ate 
[ pcr.ga en dare, mes a mes, tuples son los programs pteffirtdos 
. dp nuKfrns lectures Prsm dto. k ohligedo pregclarDS d ledarncn 
1 g y te^er r& i el me^ lemiomelra para ccoocsr visestras jMe^eien' 
I 1 cios Rjddis vpiar pqr cuoiqgiar pfograma amide no ha *2 side ra- 
. mrniado lodavin en INPUT 


FI rsseiiads de las yotflcitm s&ra puDlicado en cade nijnsco 

de IftPUT 

En!re tos velantes soriesffltnos 10 clntas de los WuaK <siFd pidaui 
en vueslros oupones 

Mala: Nc es creersr? qutr sorit'n la revisla, una ctp a tiec?a a 
manumj o una sinple lotixcpia Sirven. 


i 

-a 

i 

* 

I 

P 


Enyiad vuesuas vatos a lus mejure.5 oe input Aribau, IBS. Pianta t. 08021 Barcelona 


ELIGE TUS PROGRAMAS 


I 

■ 


Prints Irtuln efctilift iL_i . l i j . . i j— J_ i„j J 

T«c« Cltiiln eitpidD I J I I L J -J.. . I i I 

Qv4 cw£km#4(» tlenw L _j _i_i_ t _i_i_i_i_i_1_i_._i_L 


I.UiDflllGD ; J | | | | 

1 1 1 1 1 

1 I 1 — 1 -J -1-L 

rteta de na«jii' t-itj 1 : i i 

i ■ i 1 1 

tiit j i—i 

CtamcrjOci ! ■ I I I i. i 

l 1 1 E 

. i i i i i i i 

FfdVincia 1 1 1 ! i l 

i * » 1 

i i ■ t i_l_|_1 


L_ 


SasnimSo ntuui Hi-gidD |_i_j_ i _i_|_j_f_i i_j_i_|—L t 

Froflrama qt* It quslarla cwtse^uir i . . . i J 

Ptombrc I_ j: _ I_I_I_1=_1_[_L_l__^ L t- I - L j 

J. p Affdllifo . j_i_i_ i _i_ i _i_i_i i_L i_- : j 

+ 

TBlttlHW I_|_ J _|_|_ | _|_|_|_|_|_|_| |_|_|_|_l 

m 

IbtihfMi ( _|_|_|_|_ [ _|_ | _ i _|_ L J J _ U_| - 1 - 1 - E - L 

■k 

INPUT SINCLAIR M U \ 

_______1 


4 INPUT 

































Aplicaciones 


MUSICA Y SIMULACION 
DE PARTITURAS 

A continuaricn public am os ta segunda parte del listado correspcndtente al articulo Musics y 

simulation de partrturas, 

1G50 IF a$="4’* THEN GO TO 1600 
11 m GO TO 905 
1199 REM sub*utina ae alay 
12130 GO SUB 500 
12Ip FOR n-1 TO max 

1220 PRINT PAPER 5;AT M{n,3).12;CHR$ iMCr.,4)} 

1225 IF M(n,&]=2 THEM PRINT AT M£n r 3}, 11 
1230 IF M{n,&]^l THEM PRfNT AT M(n 1 3) < ll:"b" 

1235 IF M{n,2)=100 THEN PAUSE M(n,l]T50: GO TO 1250 
1240 BEEPMMrUWn.2) 

1250 PRINT PAPER 5 ; AT M(n,3Uli” " 

1270 NEXT fi 

1275 LET rrnmaxr LET cv=5: GO SUB 500 
1230 RETURN 

1299 REM edit 

1300 LET aS= 'EDIT MODE s SALlR X ADELANTE l ATRASmMODIFICAR n NEW': GO SUB 5000: 
IF mod = 1 THEN GO TO 905 

1310 PRINT ATMtn r 3M2; PAPER 5: FLASH 1 ; CHRS (Min.4)); IF M(n.5) = l THEN PRINT PAPER 
5-AT M{n t 3),U; > V 

1312 IF M[n,5}-2 THEN PRINT PAPER 5 : AT M(n,3Ui: H . M 

1315 PAUSE 0: PRINT AT MCn,3> 1 12 ; PAPER 5, FLASH 0; OVER 1;” " 

1320 LET a$=lNKEY$ 

1325 PRINT AT M(n.3).ll: PAPER 5" M 
1330 IF a$ ="x p ' AND n<mait THEN LET rt-n+1 
1350 EF at-V AND n>l THEN LET n = n-l 

1360 EF aS-'V THEN LET edatmode =p: LET mod-0; LET cv= 5: LETdrlcp=gctr GO SUB 500: 
GO TO 900 

1370 IF a$=”irr THEN PRINT AT MEn.3J.ll: PAPER 5;” LET gnnaji-maixs LET ctrlcp^O: LET 
editmode - 1: LET n-n-1: LET mod-1; LET 1v = Min,3): LET cv=12: GO TO 905 
1375 IF aS = "ir THEN RUN 
1380 GO TO 1310 

1399 REM print 

1400 LET mod=0: LET Cv=5: LET n=rnax. LET editmpde-0: GO SUB 500: LET ctrlep=;gctr: LET 
a$="AHORA ESTAS EN EL CONTROL DE TECLADO" GO SUB 5000. RETURN 

1499 REM save 

1 500 LET at- 'PREPARA LA CASSETTE PARA GRABAR' 1 ■ GO SUB 5OO0 
1510 DIM V(m LET Y(20)=am ; LET V(21 )-ctrlcp: LET V( 1) -max- LET V(2)= campas: LET 
V(3>=gc: LET V(4)=oc!&var LET V(5)=t: LET V[6) = £t-D/.09+ 193: FOR a=l TO 13: LET 
Vf6”a)= CODE SCREENS (a r 3j: NEXT a 

1520 SAVE ■'mu^ca" DATA M(): SAVE "arroadura" DATA Z0= SAVE "adictonar DATA V(] 

1525 CIS: GO SUB 400 
1530 RETURN 
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1599 REM load 

1600 LET a$= f 'PREPARA LA CASSETE PARA CARGAFT: GO SUB 5000 

1610 LOAD "musics ' DATA MO: LOAD "armadura 1 DATA FO LOAD "adscionar DATA VO 
1615 LET am=V(20): LET rtrlcp^ViZlI: LET rnajc^Va): LET compas = V(2;-: LET gc~V(3l: LET 
t*V(51: LET octaua=V(4|: LET labsc=V(6) 

1620 CLS' GO SUB 400 

1625 FOR a = l TO 13: PRINT AT a.3; PAPER 5 ; CHft$ {V£6+a)) : NEXT a 

1630 GO SU8 4510 

1640 GO SUB 1830: GO TO 350 

1699 REM octava 

1700 IF a$o"H" THEN GO TO 1740 
1710 FOR b-octava TO 2 

1720 FOR 3=1 TO max; IF M(a f 2)<>100 THEN LET M[a,2}= MU2J+12 

1730 NEXT a; NEXT b 

1735 LET octava=3L GO TO 1830 

1740 IF a$o''L ,p THEN GO TO 1780 

1750 FOR b^oetava TO 2 STEP -1 

1760 FOR a= 1 TO max; IF M(a.2)<>100 THEN LET M(a a 2]=*M(a,2)-12 

1770 NEXT a: NEXT b: LET gctava = l: GO TO 183G 

1780 IF Dcfa^S THEN GO TO 1330 

1790 IF SGN (oclava-21=l THEN LET suma = - 12 

1800 IF SGN ';octa*a-2J=-l THEN LET SLima=12 

1310 FOR a- 1 TO max: IF M(a,2)<>100 THEN LET M(a,£l= WKa.ZHsuma 

1820 NEXT a: NEXT b: LET pct3Ya=2 

1830 PRINT AT 9.22: PAPER 6; BRIGHT 0; OVER i;" ";AT 9,21+octava: GRIGHT 1 ’ " 

1840 RETURN 

1899 REM tiumpg 

1900 IF a$ ’’o' 1 AND tab«-l<>lfl2 THEN OVER l: GO $U8 4600: OVER 0 LET 
tabsc=tabsc- 1: LET t=t-.Q9: GO SUB 4600: PRINT AT 5,26; PAPER t INVERSE l;" 'LAI 
5.26; :sb&c-183 

1910 IF A$^"p" AND Iabsc.+ 1<>248 THEN OVER 1= GO SUB 4600 OVER C- LET tab6c=tabsc+lr 
LET t=1f .09: GO SUB 4600; PRINT AT 5.26. PAPER 6: INVERSE i AT 6,26; 
tabfic—183 
1920 RETURN 

1999 REM control de peniagrama 

2000 PRINT PAPER 7;AT 9.28 : M ,a 

2005 IF a$= ,r w" AND Iv-lOO THEN PRINT PAPER 5 : AT fv F cv; FLASH 0. OVER 1;’ ,N ;AT fv-1, 
cV; FLASH 1 j m "i LET fv«fv-l; LET u-n2+l: IF u 8 THEN LET u-1 
2010 IF aS^ M S" AND fv+l<>14 THEN PRINT PAPER 5;AT Iv.cv; OVER h FLASH 0;" “;AT fv+1, 
tv; FLASH 1;” LET fv=fv+l; LET u=n2-lr IF u=0 THEN LET u = 7 
2015 PRINT PAPER 7 r AT S,28;NS(u) 

2020 RETURN 

2099 REM D&tencion be ff a pgrtir be fv 

2100 LET nl=14-fv 

2110 IF nl>=8 THEN LET n£=nl-7: LET ff=F(fl£)+l£ 

2120 IF nl<8 THEN let n2-nl; LET !#■= F(nZ) 

2130 RETURN 

2499 REM todilicacion de beeps 

2500 LET n=n+1: LET max^n; LET am=am+l : IFam=15 THEN GO SUB 4800 
2510 IF 6(n2l=l THEN LET M{ft p 5)=l 

2520 IF eCn2h 2 THEN LET LET M(n,3) = fv-I: GO TO 2540 
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2530 LET M(r,3)=fv 
2540 LET Ft -1.''(2 t - 97]) 

2550 'Feed-£03 THEN LEI rt = rfL.5: IF Mfn 5)<> ] THEM LET M[n.5)=2: LETged 0 

2560 LET M(ri F l)=rt 

2570 IF £1=1 I HEN LET H = 100 

2560 LET M(n r 2)-ff 

2590 IF ed>=97 AND cd< = 103 THEN LET M<n r 4! = C0DE z$(cd-96) 

2600 IF ed>*65 AND cd<=7* THEN LET M(n r 4KC0DE z$ttcd 64)+5] 

2610 RETURN 

3999 REM prmtej- 

4000 PRINT PAPER S;AT fv,cv;CHR$ (M(n t 4)l 
4020 LETcv-Cv+2 

4030 IF cv=21 THEN LET cv=5; GO SUB 550 

4043 LET etrlcp=ctricp + M(n,l); IF ctrlcp> compas THEN GO SUB £200 
4050 RETURN 

4199 REM eontpas ileno 

4200 LET ctflcp-0; FOR a- I TO 13: PRINT AT a.cv- i; PAPER 5; OVER 1 T 
4210 NEXT a 

4220 FOR a- 1 TO 7; LET NEXT a 

4230 GO SUB 4510 
4240 RETURN 

4499 REM pasos ZtaHFEa) 

4500 FOR a= 1 TO 7, LET Z(a)=F(a)r NEXT a- RETURN 
4510 FOR a- 1 TO 7; LET F(a)=Z(ah NEXT a: RETURN 

4599 REM pun Eero de tiempc 

4600 PLOT tabsc-2,142: DRAW 4,0 DRAW -2.2: DRAW -1,-1 DRAW 1,0. RETURN 

4799 REM ampiiacion de matriz 

4800 LET am=0 : DIM Htlm.S): FOR a- 1 TO lm: LET H(a, l^M(a.l); LET H[a r 2l=M(a,2): LET 
H(s,3)=M(a,3h LET Hta,4}=M£a,4): LET H(a P 5>^M£^55; NEXT a 

4810 LET lm-lm+15; DIM Mtlm.5) 

4820 FOR 3=I to lm- 15: LET M(aJ) = Hta.l)- LET M(a,2) = H(a,2): LET M(a,3*=H{a,3): LET M(a 
4); H<a,4): LET M{a,5) = H{a.5L NEXT a 
4830 RETURN 

4999 REM subrutin-g de mensajes 

5000 FOR a=l TO 20: FOR b=l TO 3: PRINT AT l4+b r a : PAPER 0;" NEXT bz NEXT a 

5005 LET mi - " LET mil 1 TO LEN a$}=a$ 

5010 PRINT PAPERS: INK 7: AT I5,l;m*tl TO 201: AT 16,l:m$f2I TO 40);AT I7,l : m$(4l TO 

m 

\ 5020 RETURN 
\ 9999 PAPER 7: BORDER 7; CLS 
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APRENDE A DIBUJAR 
EN 3-D (y II) 


I I programa Jo Jihnjo de moddos 

■ i - tl' que tieni''^usm en levs tk>s 
.iHiluIi’iv .miefioros lu permile dibujai 

i net e n i re s dime nsione s y carnbin i 

■ i i.■ iii .hi- « Peto ic presents siempre 
. rni^mu puiiTO ..1 1 j vista; la cara iron- 
mI .v l viihri u--. I.i qiiL’ aparece siempre 
IliH' proyirna .L li y, Liuru|ue puedus ver 
,i trav del solidu de al ambre. no tir- 
ii.. - posibitidad dc \crlu desde amba. 
Je -de u Hi Ldu u desde donde quieras 
mi r aria Fn cstc artfculo encomr^ 
unas rutinas adicitwak-s que te per- 
mitiran especifiear la posicitin do tu 

■ ■ jn Jc m.Liter:i que puedas eoniernplar 
d cubo desde tudlquiLT diweeidn. 

5e train de unn herramtenM muy 
uui. especial mente cunndo empieecs a 
d 'ur.ir objetos mas campticada5 T ya 
que a I conic mplaflos segum dtferentes 
[lirqxLiiii[:!i puedes tkseubrii ras-gos 
ocullos o scmtcscfflndidoK Adcm&h, si 
especificas una suceiitin etc conrdciw- 
dLis difercnics pau la position dc tu 
Lsju., puedes ofoterwr la imprevton de 
esiar xobeevtilartda el objeto a cjmL- 
nnneto itlrciJuiiDr lIlz I mismo Sin cm- 
barga. ta secufnera dc dibujos que fS 
posiblc ubtcrtCr en un urdenudur dim¬ 
mest ico cS muy lent a y d elect s nn es 
d mEsmo que sc obticnc con La ^cl*>- 
eidad de I os sblidos de alambre eo- 
rrierciules en que cl observadnr parece 
que -ic prccipita sobFc el eocbc. pla- 
nmu o lo que a gnut velocidad No 
obstante, k>s pnneipios que i nterne - 
lien son biskamunte los misnios. 


EL EFECTO DEL PUWTO DE VfSTA 

Yli vim os cn cl anfculo anterior 
cdmocs posibie dibujar un objetu in* 
difHtrtsiati ti/en una pantalla dc das dh 
mensiones utili/undo una oonvenribn 
visual que puede ser interpret;! da por 
el ojo y el eerdrro dd observador. Los 
programs .micnorcs bncfiin asio ulr 
li/a ndo un.ii proyeeddn isotn&trica cn 


hi tjuc his llincas indinada^ se supone 
que rctrocedcn « avanTian □ panic de 
la panlalLi 

I .a form a mbs com un.de eon v c nctLin 
(.-isual es cl dibujo en perspective, cn 
d que las llneas que se alejan del ob- 
sGrvHtlyr etJitvcrgeti cn lim punio di--- 
r.mfc. Ilnmadupiirtiode lu^a. .icviriuii 
dose en csrorzn cornu vi desaftareue- 
run. En una verdadera |x-rspeaiva de 
ires pumos hav reaLmenle ires elirec- 
eioncs dc fuga >■ ires ]>amtts Jc lugLi. 
una para cutta unu de Lla tres eiL-s. Lu 
position dc los tres pun ms. esia deier- 
minada pur hi rducibn enlre lb posi¬ 
tion del obsetvador y hi ptwici^n sld 
objclo que desen representat. ^ Re- 
cuerdn sin embargo que cn la convcn- 
eibn visual estos puntus sun imajcluii- 
rtos.J 

Q>n ej.Eo ya dbpofvemos dc una 
clave snbre la forma de represemar un 
objelo, l id eomo un cuho en un e»,p:i- 
nk* dc ires dimiEnsionts. tul como se 
ec rni desde dlfcrcntes punlOS dc- eistn. 
Para dlo sefti necesimo definir anas 
nucvhis tranaforniiicLonGS que produ;;- 
can el efcciLsde cortvcrgenctu bavin un 
puni p de I'uga v que acorten el ob|CtO 

Lo primero que tienes que saber es 
hi relation que bay enlre 9a posieirtn 
tie I observador y la del objelo Para 
ileterminarla Henes que rclacionai el 
punlo dc vi si a con Los ejes X. Y y Z 
L |ue has ilefinido en Tu pnnr.illa Lvu ^ 
preei'Jinenk Lo que hltOJl I OS prugr.i- 
masque vamn-. u ver. ocupandose tlcs- 
pues tie las Trans!Lirmacioncs nctesa- 
rias. 


ANTES DE EMPEZAR 

Para podtr c>cCular las mievas see- 
ejones del programa, netesiilJ?i ia rr#- 
frcicr dc rejilla que vimus en. cl aitieukT 
anterior. Si guurdayte una copia dedl- 
eha niiina. icndrfo ahom quecargurla 
con una inslruccion LOAD. Serin una 
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;lmprrs.iimanlc! I-.yLu i'% la uqItu ina- 
itL'ru dr lhJ iRear la palrnda Ijraiiyfur- 
rn ;uJ j ira dr r sir pru jjra mua! st‘ji.u ii da dr 
Lu itrir. rn rl qLtfcSr incurpurun J,l ptrs- 
pOr [r j . rE pu ri In d r vista s la ptniTafiPn 
dr Oft urns idainl)rica k i. 


■ _EL EFECTO DEL PmiQ 

_ de VISTA 

■ ESI ABLE Dlffcbo LAS VARIABLES 

_IMPALES 

■ PRQGRAMACIQN MODULAR 
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INPUT 9 































buxna idea que carganui Umhien hi r li¬ 
ma fit dibiffo dtf ebvUlo que lambjfn 
explicamos, En re alidad uhora no b 
vas a rtcecsitnr, pern convene Wrtcr 
Locbs las ratine juntas para cl pro- 
gmma dc Jibuti del gjobo quo Virrc- 
rno$ m£ai. adebme. Eri conseeuencb 
la^ linear cine becesiias sun JcsJc b 
5dOUslil puedev borrnr [mbs las 
dermis tineas. 

Iqusil que antes. tendrite que ledenr 
varias secrioncsde programa antes de 
podtfjf jKisjii a ejccutmr nada, ya que 
prime ramente ricnes que defimrb pa- 
sicitfn dal a jo y las Lransformactones 
para las rotacioncs y b perspective 


DEFlNIEMPO TU PUNTQ OE 
VISTA 

La prime™ section del pro^rarda 
Ciilenb las variables rtecesarias para 
determiner b position Je Ui ojo cn cl 
espaeiLi tridimensional; 

80015 LET XV=Xr LET ¥V=Y: LET 
ZV^Z 

8010 LET WV™YV'W+ZV*ZV 
8020 LET FV=SQR (XV'XV+WV) 
803.0 IF PV=0 THEM RETURN 
8035 LEI WV=SGR WV 
8040 LET XU=XV/PV 
8050 LET YU=W/PV 
80&0 LET ZU = ZV/FV 
8070 LET WU-WV. f PV 
8030 REM QRtEHTAClON 
8090 LET A-XV*YV; LET 8=ZV: 

GO SUB 8450: LET G^H 
ei00>LET A-W:LET B=XVrGG 
SUB 8450;LET G = G + H 
8110 LET SOUSING 
8120 LET CG=COS G 
8140 LET Rl = WU r CG 
8150 LET R2--WU*SG 
8160 LET R3=^XU 
8170 LETfi4=-YU 
8130 LET R5- -ZU 
8190 LET R6^XV*XU+YV*YU + 

zv*zu 

8200 IF WU-0 THEN GO TO 
3340 

8210 LET XT =XV* WU—(YV*YU + 
ZV*ZU)*XU..'WU 



3220 

8230 

8240 

3250 

8260 

3270 

3280 

3330 


LET YT=(YV*ZU-ZV*YU).' 
WU 

LET R7=(ZU*£G 

XU'YirCGJ'WU 

LET R8={—YU'SG- 

XU'ZU'CGfc/WU 

LET R9=GG*XT+SG‘YT 

LET SI = (ZU*'CG+ 

XU s YU-SGLWU 

LET S2 = (-YU‘CG+ 

XU*ZU*&GVWU 

LET S 3 =-SG i XT+CG‘ h YT 

RETURN 


8350 LET R7--1 
8360 LET R8=0 
8370 LET R9- 0 
8330 LET S1=0 
8390 LETS2-1 
8400 LET S3=0 
8410 RETURN 
8450 IF E<>0 THEN LET 

H = AIN (Ai B): RETURN 
8460 LET H = PI/2: RETURN 


El ojo se siipone siluado en (XV, 
YV, ZV'i„ donde la V slgniliea puma 
de Visla, La variable WVda ladbtSii- 
cfcft en la direction rcsullanlc dc com 
binar Y y Z . Sc supone que el ohjieto 
qua esbs eoniemplando est4 situado 
en cl origen dc etMirdeiruida.'; (0,U f OJ, 
ongen que por simpLicidad suppnmws 
coiricrdentc con d ccntro dc la pan- 
tnlla. La llnca H030fuer7a b salida de 
la rurirta por la via rSpida en el CeSQ 
vn ljijl el punlo de vista, es dteir la 
position del ojo, sea el origen. ^ a que 
es diEieil que mires a tu propio ojo, 


Pa ra entc rule r Its qtie va suce die n Jo. 
recuerda que d eje Z a vari/.a hada ti 
saliendo dewle el cent ns de b panialln. 
el eje Y apianta hada arriba de la pan- 
talla y el e je X apunta hada la dcroeha 
dc la pantalla. 


como no sen con un cspcjO- Las varia¬ 
bles XL YL. ! jt ZU von la% diHliincisis 
en las direceiones de los Ires ejes X. 
Y, Z de una lines de lorquind unidad 
dibtijiida cnlrc el oriecn y la position 
del ojo. WU ci la dislancia rcsultsmtc 
en In direccion combinada de X y 7.. 


tO INPUT 




















Cuando conlcmpJas un objeto. pue* 
dcs ofctencr i.ti.5 lttc m l"%. visias. ilk:! 
nnsmo, uiuvi^ndpCc a su alrededur de 
izquicrda a dercctia. P;u,i olio sc midc 
un Ingulo u partir Jo I cjc X, id come 
sc hace cn las Uneas 3090 y SIQO. Ile- 
mos incluido una comprobacibn ti¬ 
neas H-I50 y 8460) para cviiar N divi¬ 
sion por cem. que inlcrrumpiria cl 
program-* y m cnviarta un mensajc dc 
error. 

Con esto se obtiene una vism nor¬ 
mal cuando se tnira direct amenie a to 
largo del eje X. produeiendosc on giro 
gradual j rrtedida que Ic viis miiivLcndo 
alicdcdcw. eon Jo que re null an villas 
iids interesartes Las lineas 3140 n 
3230 defuse 11 las variables que iljun la 
Orient addil do I ujo Cn el ejpftCiO. La 


pOsidOn del ojo sc dc manna que 
su eje 7. permanece sobre la lineu que 
unc el ls jo eon cl oricen dc la pantaEla. 

1-1 rcsto dc la rulmn define las va- 
rid Wl-s para el easn especial en que la 
pOfiiddn del ojo esui rcalmcnte sobre 
cl CJC X- 


LA$ TRAN5FGRMACIOMES 

La sfgtJ ientc section Lrunsiurma Ins 
coordenadas X, Y, Z del re bo cn 
coorden-adas finale;, sobre la pun ml la. 
Esras innsfontiftcioncs lienen cn 
cue ni a lit posktfn del pjo y el cfoclo 
de pcrtpectiva: 

8500 LET X1 = TI*X+T4*Y+T7 
85 10 LET Yl-TZ i X+T5 t Y+T8 
8520 LET ZL=T3'X+T6*Y+T9 
S 540 LET X2=R1*X1+R7*Y1 + 
R8'Z1 + R9 

8550 LET Y2=R2*X1+S1*Y1 + 
S2*Z1 +53 

8560 LET Z2=R3*X1 + R4-'Y1 + 
R5*Z1+R6 

8575 IF Z2<ZN THEN RETURN 
8580 LETX3=D*X2/Z2 
8590 LET V3= -D'Y2?Z2 
8600 RETURN 

Esta rultrta ulili/.t el algebra rmilri- 
riiit. algo complitada. para Irartsfor- 
niar las coordenadas tX,Y) r uanque 
biisicwKientc sc irat* dc tos paso* de 
inmsfnrmacibn cJescrilos en cl primer 
srtieuto de es(a sene. Las linens 3500 
u 352(1 transform an cl piano (X,Vj de 
dibujn en dos dimensioned cn el es- 
pario iXI, VI, Zl) de tres dimensio¬ 
ned. Las lineas 8540 a 35hd transfor- 
man las eoordenadas fX L. Y1, Zl) del 
espacio iHdimensional position ftndo- 
ias eon urreglu a la nituaddn y direc- 
cicm del ojo (X2. Y2. Z2). La linen 
Ms75 comprucba si la micva posicibn 
que hay que dibujar esiu deinasiado 
ccrcu dc la position del ojo. cs decir. 
si Z2 sc cncuenlra comprendido emre 
0 y ZN. o si esiJ deir^s del ojo (Z2 
negfliivo). En ambus casr>s lu posicidn 

de Jihujo \c ignom. yn que scria rni- 
pusibte visual izar d ribjetn- Mi la pn- 
siciOn csli rn^s ak' padu que /.N'. con- 
cad.L a piimr de la posicid-n del ojo, at 
final de ta nilina sc cakulan las cwi- 


dcn;ulas dc la posicibn sobre la pan* 
(alia (XiV. Y^). El pan'imeEro D/Z2 
que bgum cn cstas lineas incorpora la 
pcrypcclpva n ]ii jmqgcn, a I proyedar 
d objelo sohre una pan Ml la plana .i 

uria distandn D dd ojo. Si asanas a D 
un valor pequeno, resultui cl clccto 
de mover la pants I la ccrca del ojo. con 
lo que cl c fee to dc perspectiva es m5s 
□cusado. Cuando D es granule. In pan* 
(alia esta lejos y el efecto dc perspeo 
liva ts pequeno, la imagen aparece 
virfualmenle sin dtuorsidn, incluso 
aun cimndo se ecmlempla ohlieuu- 

iriL’nt'j eu uiiu direedcin cu;LlL|uiern 


asignacion de las variables 

INICIALES 

El Siiguienic paso es escribir dc 
nuevo las rurimu de Dibuja e tniciati- 
zacion para puder barer uso de las 
nucv.is riilimi'i dr T rafufonritotiAiii 


9000 CLS 

9020 LET 256: LET 
YM = 176 

9030 LET XD-XM.2: LET 
YDsYM/2 
9040 LET ZN = 1 
9042 INPUT "INTRODUCE LA 
DI5TANCIA AL PLANO DE 

rroyeccion-.d 

9045 IF D<=0 THEN LET 
D- 1000‘ZN 

9050 LET T1 = 1: LET T2=0 LET 
T3=0 

9060 LET T4=0: LET T5=ii LET 
T6= 0 

9070 LET T?=0: LET 18=0: LET 
T9= L 

9090 CLS : RETURN 
9500 LET LET Y=YS; GO 

SUB 8500: IF 22<ZN 
THEN GO TO 9520 
9505 IF X3C-T27 OR Y3<-87 
OR X3>1Z3 OR Y3--B3 
THEN GO TO 9550 
9510 PLOT 127-4-X3,87+Y3 
9520 LET X=XE; LET Y=YE: GO 
SUB 3500: IF Z2<ZN 
THEN GO TO 9550 
9525 IF X3<- 127 OR Y3<-87 
OR X3>i2S OR Y3>88 
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program* 11 " 0 " 


iao stop 

500 IF |(MKEYS=THEN; GO TO 
500 

510 INPUT "INTRODUCE LA 
POSICION DELOJO OLY.Z)", 
X,Y,Z 

520 GOSUB 80^0 
530 RETURN 
1000 LET P=L/2 
1010 LETTl=li LET T2=0: LET 
T3-0 

1020 LET T4 = 0: LET T5=lr LET 
T6=0 

1030 LET T7=-P- LET TS=-P: 
LET T9=“P 

1040 GO SUB 1200: REM 


ABAJO 

1050 LET T7 = —P: LET T8 = -P: 
LET T9=P 

1060 GO SUB 1200: REM 
ARRIBA 

1070 LET T4=0: LET T5=0: LET 
T6=— 1 

1080 GO SUB 1200: REM 
1ZQUIEPDA 

1090 LET T7=-P; LET TS = P: 
LET T9=P 

1100 GO SUB 1200; REM 
OERECHA 

1110 LET Tl = 03 LET 72=-1: 
LET T3=0 

1120 GO SUB 1200: REM 


THEN GO TO 9550 
9530 DRAW 127-OI3-PEEK 
23677,87+Y3-PEEK 
23678 

9530 RETURN 

La lined 9R>2(I ilefluc las dimensioned 
misirrms. de la panralla ealas direcrio 
nes XcY, mientras que la Hnea 9030 
define d punta media. I .a lines 9040 
Hja la posicLfln mis prfrxtm;t al ojo, 
que se peflnile a los puntoscietdibujo. 
La variable D da le distanda real 
rfestte la posiddn del ojo hast? el 
piano de prDyeccidn, es deem hast a la 
pama.Ua.eort la que determina la pers¬ 
pective. Los valoFes de D se 

durance la fa*e de cjecuci6n del pro 
grama, con lo cual pucdcs modifier r d 
grado dc pcrspccliva. Si no *e intro¬ 
duce ningujt valor, al pulsar ENTER 
RETURN la line a SW5 estableee an 
valor por defecto de 1000, Las linear 
¥050 a 9070 se ix-upan de pasar I os s a- 
lores a las Constances, de transform a- 
cidn. pma e sped licnr cn el flSpaeio de 
Ire*, dimeriSiones ei plartO etlqUe hay 
que dibujar la irnagen 

Esta section del prngrama conlinua 
eon la veitidci revLada de la rutiiia de 
dibit jo. bn primer lugarsc del men las 
const^ntcs de la CTansformaddn £ lines 
9500) y a concinuacid-n sc Race una 
comprobacidn (linear 9505 y V525) 
parj delcrminar si hay que dihujar un 
rmevo pun to en la pant alia (I ineas 
95li' v 953(0- Esia comprobacidn sc 
hace nceesyrta para evitax cl mensaje 
de error que rcMiltaria si inlenla* pin- 
tar la pa nulla- 


L LA MAN DO A LA RUTHMA 

Abora necesitas la rutina para di- 
bujar la reticula. Si no tcdeasle d pro- 
grama del artleulo anlerior H haido 
ahora, funlo con este programs, 

110 GO SUB 9000 
120 LET L=20: LET N = 3 
125 GO SUB 505: GO TO 140 
130 GO SUB 500 
140 IFX=0 AND V-0 ANDZ-0 
THEN GOTO 170 
150 GO SUB 1000 
160 GOTO 130 
170 CLS 
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ATRA5 

1130 LETT7-P: LETT8-P; LET 

1140 GO SUB 1200- REM 
ADELANTE 
1170 RETURN 

1200 LET XA~0; LET YA=0; LET 

LW-L: let lh= l let 

NX^M- LET NY=M 
1210 GO SUB 5000 
1220 RETURN 

l J liclIl 1 ejecutar adorn cl program a. 
Si fundona correclumenle r cntr&ri a 
la rttfifiu de InicilttiltiCidn que Cntipieza 
en In Ilnea 110. r-t,ii ruttna define al- 
jiunas variables y presents un munsHje 


de pattna.Ha pidiendoie que ml roduu:- 
eas uni valor para D, la distatiria al 
piano 4e proyeecidn, pcrspectiva 
i QCOrpMfldil cn el prog ruma es tat que 
euaino mayor es eaia disianda, mis lr- 
j os aparece el object* con lo que re- 
SLiltarfi me nos elects f tie pmpeclj vs. 
Pm a empeaar puedes imroriurir un va¬ 
lor de 1000 El priigjitrtni return n :t hi 
llnea 1211. que eSpcdfiCA la longUud L 
de cada I ado del euho L y d numcro N 
de ruadradm de la rcjilla cn cada cara, 
Las lirveas OU a ICO teen las coord e- 
nada* de la postctdn del OfO (tinea 
5101, dibujaado a eominuait-Ltiu el 
cubes a parlir de esii posteftn. En 
cuanto cst£ dibujada La primers vista. 



puedes mlrodiidr un mievtj canjunto 
de coordenada. 1 ), para ver cl rubo 
■desde ana rtuevn dirtcciPii, FI pre- 
eriirtrii tennina cuundo sc Lnlroduccit 
Itn. valores, 0, 0 y 0. La rulina que 
abarej las Lfncas 500 a 520 bacc renl- 
inemu uria Hamada ;i hi mam; de Pn- 
ski&n (Ii’hcli 520) pard eslablecer Eas 
COnSEuiilUS de la IramifOnJIaeidn, La 
ruUna d?t Cuba- (llruHs 31H H i a 1170) cs 
Ll que positions n eonlinuacidn y di- 
bvja cada una de las sc is cara* La «i- 
tina Cara situindu entre las Hneas 1200 
y 1220 dibuja cad a eara eomo unu cua- 
due 11 la. con ay min de la nttina Grid. 

Ensaya diferenies valorem lIc En po- 
sicitin del ojo para cstudiar el efeeto 
del puntci dc vista. Para empezar. puc- 
dcs utilizer un valor dc 1000 para D v 
200, 0 y U para X. Y, Z. El cubo apa'- 
reee con el mimo lamuria pero la 
perspective es mutbo mis pronun- 
tiada. Para inlrodudr riucvos valores 
dc X. Y y L y pulsa cualquier teclo y 
apa rcccra c I me nsaje de panialLi Para 
modificar el valor dc D, licnes que 
pulsar BREAK y a ctinrinuaddn CJC- 
cutar d programa lie nuevo. Tc apa- 
rcccrti un mensaje pldlcndote cl valor 
de J> y un se^undo mensaje pidien- 
dote I os valores de X. Y v Z. 

Si en alguu mo memo bubiera que 
dibujar purttis fiaera de la zona dc 
pantalla, te Dpjircccrfl »n mensaje dc 
emsr. En ponsecueneia et prcsgram:s 
ipnoru cualquicr lines que sc saiga 
fucra dc In zona disponible, Esto 
puede llevar a resullados cxiranos, yn 
que se omite (tula unu Kites jnduso 
Aunquc solo sea una pequena parte dc 
dla In que sc saiga del m&ximo pi- 
mltido. Los pumosque sc cncucntrcn 
mis prOximos que una detenu inada 
distaucia minima, y Lis puntos que 
queden pnr dcinls del ojo, se ignoran, 
AsT, si In posiddn del o)o cs muy ccr- 
cann al cubo o s<i‘ cncuenlra denlro del 
mismo, pueden productrse taiubtiii 
nesultados fatsos. Se podm Lneluir una 
COittpruhudori lIc esltts pun Los n Ii:l- 
ciendo un re Lone Hprciximadu de las 
[iueuSn peril esto requerina una con¬ 
siderable cantidad dc pro gram a y dc 
cileulo ailipional. 

Guarda ahora en a ill a o cn disco 
unu cOpia del lJ^[iiL^o CorttpletO. yaque 
a continuaddn veris la forma de usar 
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L>1;is rni'-niji, rutirtah par.* Jibujar lur- 
is JuplKiLjys\ para gencrar jJgudOs 
sir, iNftis arc ul ares basruite especto- 
eularcs 


MODELOS DE ALAMBRE V 
CURVAS 

Htisla ahora herons eslsdn vicndn Ea 
forma dc eunscguir figures b.isieas a 
pa i r if de ret feu las recta ns u litres y cir- 
cuius rancdnlrKoi, lambic n hemos 
viito edmo w ptieden ulilizar (life ren¬ 
tes tninsfornm'iones para combiner 
una herit de re'ill as quc Cuinponsn la 
Imogen de ui3 eubo en perSpeCtiva. Ert 
,-sle jrliculu Litlruducim: ^ vu el pro¬ 
grams quc fremos desarrolladci' h&sta 
ahora unas vanadoncs minima quc 
noi permit inin umpliar la jwma dtr po- 
s jhlcs- figures de al am lire que sc pue- 
den dibujar. 

Para empezar. es muy sendita con- 
sciquir imdgenes multiples. Si has fra- 
bajado eon ef program ti que empreza 
en Li lifitLi St KiO r liiltirds olK&rvado que 
se ubuenen efuctos de perspective bas- 
tame cspectacuJarcs cuandt? D (la dis- 
NitkciLi it! observation adquiere valorem 
pequehos, por ejcmplo entre 100 y 
•H*i matinEm 1 ' .|Ul' cl efsMiio de pCrv 
pcelivH es muy pisco acusatki ruanJu 
L> es del orden dc varies miles. Ruedes 
columnar ahora con ct saguiente ejer- 
ddo para vi*utiliZ;tr nu uflO, hillQ CUu- 
tro cube* al mi&mo tiempo en la pan- 
fall a. 


OBJETQS MULTIPLES 

Si canservas aun el programs del ar- 
IecliIu anterior. te ahorrtirfis tin mon- 
tijn dc trehajo utilizando una simple 
instruction dc LOAD j fm dc csuitatlo 
de nuevn en tii ordercador Si no lo 
irutirdaste, tend res que teclcarki de 
nuevo Asce urate tambiin dc cine tie- 
rcK la mitna Circuto* que times en cl 
primer artlculo. 

Cnmo todu el pro gram a esti escriio 
un btnquc* O ru Units LiutOnurnOS. IC- 
sulta scncillo modifkarlu para que Ji- 
buje figures; multiples en vez de Ji- 
bujar una sola. Por ejempto. para d;i- 
bui.ir euiifro euhos. m ftencs mas que 
espedfiear sy pcsicldn en la pant alia y 
tluma r a la nnmu Cuba cuairu wees. 


El me pi. u siiiu para espedlicar la po- 
siddn c:i Ja ruiina dc transformaci^n 
dc eoordenadns. Modiflcu esta pane 
del I:si ado dc lu mnnera siguicnlc, 
pero no ejecutes cl progrania tcxlavi^: 

a&0p let X1=T1’K+T4*y+ 

T7 + X0 

8510 LET Y1=T2 # X+T5*Y+ 
TS+VO 

8520 LET2I=T3*X+TS‘¥+ 

T9+Z0 

Las variables XO, VO y-ZQ al final 
de estas lirveas espedlican on Jespla- 
zamiemn en cad a una dc las ires di- 
recciones dc Insejtfs de cnordenadas a 
fin dc de terminal Ea ^cparacidn de k)s 
L-uairo cubos. Estas variables sort las 
que recibcit vdlufrs juslii antes dc quc 
se dibuje cada cubo 

Tcclea abora la siguicnlc section del 
piogrania j cjccuialu para obscrvar el 
cfccto del despla/amicnto: 

120 LET L”20; LET PP™=20r 
LET N = 1 

150 GO SU8 1500 
1500 LET XG=-PP: LET 
YO—PP- LET ZO=0 
1520 GO SUB 1000 
1530 LET XO—PP: LET 
Y0=—PP; LET ZO=0 
1540 GO SUB 1000 
1550 LET X0=PP’ LET YO=PP 
LET ZO=0 

1560 GO SUB 1000 
1570 LET X0--PP; LET 
Y0=PP: LET ZO=0 
1530 GO SUB 1000 
1590 RETURN 

Al ejucutar cl progtama, benes quc 
]r rc«p<jrtdiertdo a iu'. mensajcS quc te 
jpareeen cn la pant all a. El primer 
mensaje tc ptde quc initodu^cas un 
valo r para D, la diHlnndu a I piano de 
proyeeddn. Un valor de ]<H)Ll cs 
bueno para empeaai, El siguiente 
mensaje te pidc quC inttodnzeas la po¬ 
sition del ujo. por lo quc tendrAs qtte 
seclear los valore?; dc X, Y y Z. Aquf 
te prese nturnon un conj u nco dc valo res 
Line te dar.1i) de te rrmruadu !> inu^nci 
en la pun tally. Prueba con eSIus y oh- 
serva c6mD he disturhionan las innlge¬ 


nes cuandti cl valor de D es pcq uctio r 
\ c6mo es>n fj grande Ll dihtursidri c;- 
innprcciiblc, Ensayaotro-svaltircsa tu 
gustiv, incluycndo alguno de varios mi¬ 
les prira t). asieomts vaLores negativos 
para X. Y > Z. 


D 

X 

Y 

Z 

IDO 

35 

0 

0 

l XW 

200 

-25JI 

700 

2J0CKKI 

i«w 

5IHHI 

moon 


La rfca variedad de vistas posibles 
con es,ic proeiama le abfe Va amplios 
hori^ontes piira rcaliiar eJtpLTiment'ts 
intcresanteh, pero no ticnes por c|ue l 
ecnine unicarnenle a cam bin r los vn- 
bres de la position del ojo, Como ha- 
bras vislo, I a I trtca L 1 1 dc la uItima sec- 
cliSn de proguma quc has teclcado de¬ 
fine coma variableh la longitud de lu 
(iri^tti del eubo (L). la separaenbn de 
tin cuho a olro (PI 1 ) y el tiumero dc 
cuadrados de la rcifoda ( N) para cada 
tin. i de las Caras; aqui ficnes puesutras 
Eres variableh quc puedeh moditicar 
arttes de barer correr el prcigr.ima. 


UieUJANDO UN GLOBQ 

Aunquc cl programc quc ccabas de 
introdiitir e* eorto, es cnpnz dc oon- 
fi^urair i niu genes complcjas, deb-ido a 
quc puede llama r u cuulquiera dc las 
rut 111 as que com pone n et rcstu del lis- 
futliv Ijrua de estys rutinas pudriil ser 
la que dibujti cfrculLis coneemriccs. y 
que y>i comcniumoB cn cl ariiculo an¬ 
terior. Si in program a no cuntienu esta 
ruiina, ted^aia ahora \ guards una co- 
piadcl progrAmti Completo para podcr 
uiilizarliL cn cl future. 

Ahora puede?. rnndificar cl pro- 
grama para quc cn vez dc llamar a Efts 
mtmas del rj tbit, reticula v cuni Manic 
:i la rtitina Ctrculo. Borr;i la linca 12E1 
y a continuaeidn tcelea las sifiui ernes 
lincas; 

100 LET XO=0: LET YO=0: 

LET ZO=0 

150 LET R^20: LET N=18: GO 
SUB 2000 

2000 LET 17=0: LET T8=0: LET 
T9=0 

2010 LET T4=0; LET T5=0: LET 
TG=1 
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2040 LET KA=2*PI/N 
2050 LET KG = 0 
2060 FOfi K=1 TO I NT {N/2} 
2070 LET Tl=COS Kfi; LET 
T2=SlN KG: LET T3=0 
20S0 LET XS-0: LET Y$=0- GO 
SUB 6000 

2090 LET KB=KB+KA 
2100 NEXTK 

2110 LET Tl-lr LET T2 = 0: LET 
T3=0 

2120 LET T4=0; LET T5= 1: LET 
T6=0 

2130 LET KA-KA/2 
2140 LET KB-0: LET RR-R 
2L50 FOR K«1 TO N 
2ISO LET T7^0: LET T3=0: LET 
T9=RR‘COS KB 

2170 LET XS=0: LET YS=0: LET 
R = RR'SIN KBr GO SUB 
6000 

21S0 LET KB=KB+KA 
2190 NEXT K 
2200 RETURN 

La primcra pane de b fase de ejo- 
etieicin de cste proisramii te resultari 
familiar, vacilic se traia de scleccionar 
im valor dc D y a continuation un va¬ 
lor para ]n posicidn del ojo. Una vrz 
ini roducidios star valoics. La Line a ISO 
Llama a la rutina re<i£n icclcacb para 
tlibujarb imagen deun globe, |- >io w 
hate a partif tie una serie dt L cJipses (o 
elmitos, deptndt-endo de ]a position 
del a jo). For una parte est^n las line as. 


Rl glnbo es una dr Llu formas mas 
Fencill^ que puede represent arse me- 


111 f\c de la esfera es b Lines que 
pasa par tnfli polos y su diretcidn dc- 
pentte Je Los valorem que hay as imro- 
ducido. Fara ver la forma en que qua¬ 
rtan situajos Ids globusen rclae idncon 
Ids ejes de b panlidta, tct-lea el valor 
0 para b position de dos dr Lis COOf- 
denadas del punio dc v\m. por ejem- 
plo (OjQ.SOQ) y observe cl rcdultado- 
Prueba ahora si introdurir valorcs pm- 
siiivos o nogaiivos para las tres coor- 
denadas. parsi ver cAmo sc dcsplazan 
Ins polos respeeto a I os cje&. 


iJrj lumiLlud 1 l| u l 1 pjsan pur Los polos 

dc la esfera) y por oira bs dc laiiim!, 
qua s«a pn Hildas a! ccuador 
El; valor del radio de la esfera esld 
dado por la variable R (linen 150), 
mientras que el numero de linens de 
I Luigi Cud j J Hihji.l rsL.:i dado poi N. que 
liene que see un niimrru p:ir mayor 
que 2 . Las Line as -IN Hr p. 2U30 du linen 
las variables para posiciunar cl globo 
y -sc uliltaan side mas comm con Cad arcs. 
El butle que hav enlre I .is Line as 2(lfi0 
y 21 (HI sc i.xup.:i dc dibujar las linens 
de longitud (Eos meridianos), mienlras 
que cl que va desde la I Inca 2150 a la 
2190. dihuja las [incas tta Ini hud cons¬ 
ign (e {los paralclosi. 


PASANDO DESDE EL GLOB 0 AL 
TORO 


INPUT 15 
















diuiHe un;s verie de elips^s., pcro estc 
mismo programs cucnta crm (ottos Jos 
tEenriiiiiloi rvucesyrtui: pmra dibujar 
mras formas mucho mis ctidliciS 
Ctimo pur ejemplu ull toru (vs dcdl, 
un donut compk'io con un agujcro en 
medio), Para ello no se requieren mas 
que unas pequeiias modiEeflciorics ert 
J,l rutin a del glolw-. Aquf 3as tienes: 

150 LET R= 10: LET W = IB; 

LET RT^20; LET N2=18; 
GO SUB 2000 

2040 LET KA=2*PI M2: LET 
NC=N2 

2045 IF RT-0 THEM LET 
NC=IMT (NC. r 2) 


2060 FOR K=I TO NC 
2080>LET XS RT;LET YS-0;GQ 
SUB 6000 

213p LET KA=2'PI/M 
2135 IF RT=0 THEN LET 
KA=KA-'2 

2170 LET XS=0: LET YS=0: LET 
R = RT+RR t SIN KB; LET 
N=N2: GO SUB 6000 

Ejccuia cl programa V Como res- 
ptiesia a los mcwiijes da pantalla le- 
dea alios va lores ailcmndos para D y 
para la position del ojo, Eltfl v« la 
Variable R COf respond^ a3 radio in- 
[crno del tubo. micutras quo el nil- 


mere dc segment os radtaJes csla dado 
por N. Eisttis segitteuios mfT&vjwnden 
a las lin-CtfH longitudinals del doUo. 
RT asigna la distiincia (un radio) 
ifcsde d origen al cenlru del lubo, 
miemras quo N2 da el mimero dc seg- 
meiuos a lo largo de la cincunfcrcncLe 
del mho. que corrcsponden a las lati¬ 
tudes de ]a csfera. El valor de RT 
tie hr '•c-r mayor o i^ual que R. aunque 
dc heeho la rutin a si^ue funeiunartdo 
hicn aunque no pcurra esro. Modifies 
d valor de cslas variables part ubw-’J-- 
varcl cfcctu fesultaillc CuandoRT os 
eero y N es icual que M2, cl toro de- 
gene m en una eifeii, tal c«mn apa- 
rsda tlibuiada cn la rutina Gfohn. 
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COMBINACION DE IMAGENES 

i .n cl program:) anterior que JiKu- 
juba cuatro inlAgeiiG* juntas eu Id p:m- 
mJLa^e resullarri muy scnrillo sustituli 
I,l ruttim L'ubo par la ntiina Globa a 
Li rulina Tort). De una forma igual- 
me-nle xeucilliL, pLiedeH utdiz.ir unit 

combinucirin cuilquaerii dc Isis ires ra- 
liras, F'or cjcmplo, podrias (.li'huj,!r un 
cuba Jcntro de unn csfcni n de un 
tans, a induct! un cubu dentro de lira 
esfera que u \>u vcz esti dentro de un 
taro. TiimMcn puedea msertar smten- 
das GOTO en lo* pun elks adecuados 
del proe,rama para evitur que sc di- 
h-ujen J-ls tUiimas caras. de moda que 
I a i rtliJjcL 1 !! iaa rcsullc muy reCP-Fgflds 
I’cclca las sigui ernes I mens y nhien- 
dras u.na impresiominie represents' 
ctriu de una estadtin cspaeinl; 

150 GO SUB 3000 
3000 LET R — 6; LET N~24: LET 
RT=40 : LET N2 = 24 ; GO 
SUB 2000 

3030 FOR F =1 TO 6 
3040 LET A =£F+.25)*PI/3: LET 
Ll —10: LET L2=34: LET 
Nl = 12. LET R =2: LET 
N2=3: GO SUB 3500 
3050 NEXT F 

3060 LET R= 10: LET N—12: 

LET RT=0: LET M2=12; 

GO SUB 2000 
3070 RETURN 
3500 LET SA=SIN A 
3530 LET CA=COS A 
3540 LET T1--SA: LET T2=CAr 
LET T3=0 

3550 LETT4-0: LET T5=pi LET 
T6=I 

3560 LET EA*fL2-LIVNl 
3570 LET EB=L1 
35B0 FOR E-0 TO NT 
3590 LET T7 = EE T CAr LET 
TB=EB i 3A: LET 19=0 
3600 LET XS=0: LET VS=0: LET 
N=N2: GO SUB 6000 
3610 LET EB=EB+EA 
3620 NEXT E 

3630 LET Tl=CAt LET T2=SA: 
LET T3—0 

3640 FOR E -1 TO N2 


3650 LET EA=E*PI/B 
3660 LET T7=R*SA*COS EA: 

LET T8=-R'CA'COS EA: 

LET T9=R’SIN EA 
3670 LETXS^Li: LET YS=0: 

LET X£=L2: LET YE=0: 

GO SUB 9500 
3680 NEXT E 
3690 RETURN 

E.sle programs dibuja un Lari) con 
Si:is radios apuntando llucia cl centra, 
en d que sc encuentra umt esfera. L:i 
imnsen fcsultanle separeccadelcrmi- 
niwlos modclos de csladdn espaciaJ. 

El campo de ejiperirrwTitacitSn qnic 
te perm tie d proprama del toro es s ir- 
tyulmence ilimitado. Ensaya algunos 
vn lares peqncnos dc l> ejcmplo 
enire 100 y 500j junto con diversas va- 
lares. dc X. Y y Z para obwner inte- 
rcFuanlcs vislas en perspective, espe¬ 
cial men te :il recorlarel seg-mertlo mix 
cOfto dd tOTO, T'luclra tiimbien cun va- 
lorcs altn^ lIc I ) pare observar las dis- 
torsiowsque rcstdtan, 

Ahora ya« el momemo de pasar a 
los loques f inales, i:des comn el color 
del fondo y el de la lima, 


Cuendo lax imlgcncs de las cuatno 
cnbos son pequenas, oomo sueede 
cnando los va lores dc X. Y y Z et>- 
mespondientes a la posieiLin del o)o 
son mueho mayores que la dLstancia 
de observacifin (D)> es dified ver Id 
que sneede cuendo el programa 
avanza durante la fasede dibuja. Pue- 
di-i mejojar hi duridud insert judo 
semendas GOTO en Injures etlccua- 
dos del programs entre las tineas, 11 Kill 
y 1170, La mit rrndlb cs GOTO 
I23t>. jnMTtedu en In If nee 113? ique 
cs unn nucs'a tinea i para el caso del 
programs de los cuatro cubos. 


A NUEStFIOS ifWEVO'5 LECTOR ES 

En las paginas centrales de la revista encontrarAi la secdOn uPrOgrama - 
cifiti de juegasx que H compane de nng sene de articulos CO!eccP»tie b les 
que corrtmuan mes Iras mes. 

Como la poqinjcidn de Estos artieulos « i-lompre nmUritva con la Pel 
mes anterior apreefaras que no se conesponde can la del rests de la rnt»- 
ta, pudiondo paircer a Ids mis desplstadro que lallan pAglnas n que eg tra- 
ta de un error de eocuadernacwn. 


MEJORANDO LA GLARIPAQ 


PyR 


^liuy algnna rcrniii sent ill» t(e 
aCekrar cl d I btijo dt lu trxlaiititt rS* 
padil? 

La mrinii rntis udiciii di- acc- 
Ecrnr cl pro^rmna consistc en re- 
ducu cl uutEiuru de pasuv dc Lax 
nihnas biAsicas: En rufina l Hrwdo 
pam la csteclon espncial y la w- 
tirrri p:trn cl caso dc las cu* 
Ixjs. Sin embargo eslc mtftodu 
rcducira hi suavidad dc las clip- 
>l‘s y csiropeara lii ft^nua dc Jiix 
estruefnrax. IJn m^Kidn major 
cs redueir cl numcra dc vcccs 
qua sc llama a lav MlfiliWL 

PiidrEas idler pat ejemplo 
men as seectones tiansversales > 
JoncjiUilm.tlcs del raro, redu- 
cicndti Lis v&lores dc R. Xh RT 
y X2 cn Lt rulina del loro que 
cmpic/n cu la hnc a 2TH.XL Ejsio 
implica obviaiTienlc una rmidili- 
cjcidn lIcI prtigr ima ]nant que I:i 
ruliun sea JJartuda dc forma que 
espaCic coil rcgUlAtklmJ lo.x cir- 
culos l'i Lis clijvHJfi y !os sail as 
despoes de la ultima serie de 
curvan s en vcz dc scyuir con I os 
movimienttw del ditnipii miis tie 
lo ridcesark) 

Pfobdlxlememe L forma mAs 
sene 1 1 lu dc iicclcnir In cjccucidn 
consists en xaltarse d dibujo de 
deierminudaS xccdortrs Hales 
eotflo I os rudin'i de la clarion („ 
Lsto m, l hace de forma scndllo 
con unos cu autos GOTTI csira- 
tiigicamente distribuidas. 


INPUT 17 























p ro grama«i«> n 


ORDENACION, INDEXACION. 
BUSQUEDA E INSERCION 


■ BUSQUEDA E LHCLUSIQN 

■ ORDENACION 

m METQPQ DESUSIITUCION 

m _ METODCi -BU RBUJA” 

■ METOOO fSHELL* 


Si t-sias prtparitndo, u E icin'v 
bncerli), uli’ii.n programa dt artbivu, [e 
sera dc cram aj ydaCTiii^ccr Jail diiliruas 
Mcnicu dt 1 urdcnacidn, biisquEnJa c in- 
serclon de dates, Coiwcknddlas pod raw 
a pJ kiirtu S, cElCfltlB tttSO, tU- lit forElia ni&i 
ariccuiLdu i uhurrundu taertlpo y cvitan- 
dntc pntblniiat. 

CuHrdo se maneja una c&nddad re- 
dllvids dc inform acic'in pndemox ul- 
marenarta, ccmsuHnrlu o alterarM sin 
grande* problem w sin prcccuparnos 
mucho dc unlizar unox pruMdimien- 
tos excesivamcrnlc rigido*. Puede bas- 


tamo* mi lapLcem y un papel para 
unotar nucsEpis n-cccaLdadcs de cam- 
pm -cn unosgrandcs alttl&cenes- Todi* 
riuestro probfema sc resolve r£ ano- 
tando las cosas a mcdtda que sc nos 
ocurrert y consultsndo In lista cada vcz 
que pastmc* por una secridn dondc 
vcndftn algo l[lil' rccordcmos vaga- 
mentc que cenerqoa que comprar o ex- 
plorcmos nUHtra noias para ver a 
que pkm ta debemas dirigimos en cada 
moment o. Per lo general no Ecndre- 
mo$ diflcultades especiales antique en 
nucstra lista tenpmros la xigtijente re- 
lacidn: banador Luts, insane*, desa- 


yuno. melon c&, harina, leal las peque- 
r\as. dos fuquetes calc mo lido. 

Si escribiiacmos can U nvisma -il l- 
griii la lima de Las personas y tdcfonw 
dc Lina ciuJadi segunnlienlc nos vcrii- 
mns cn apriclot a la hora dc localizar 
a euaUpiKm do ellas. La compama h j - 
Lcfdnicft par to men as uni la emiiende 
v par ella nos afreet didu lima orde- 
nada por apel lidos, cal lex o profesio- 
nes (para cl uso dc sti propin personal 
mil mi mrluso otr.t ordenada por nu- 
mcraji Jc icItJfanoL 

Pam que nnn infannacidn dc eierto 

vo lumen sea util a la liara dc scr mu- 





































! id.i nwiviene que -nrdenada► 
f r .ili[urt criieiio. Si ordenadu 

pu.di: servir. pero 4 costa de que cl 
ri ■’■.edimiento Je bilsquctla strjs mas 
Lin to. Si las vuriuciones de nn.i Iks a 
■ "i nunleiosas y frecuctilcs, V cl pro- 
.,dimienio de nrdcn^cirtn laborioso 
puL-du' que nu ntjs tompcnsc la orde- 
n.iLUL'in si .Us consult as van a set es- 
poradicas. Noes infrecucnlc queen el 
,j.ictcrnn epic [enemas al Jado (Jet te- 
letomo vaynmos apuntando nombres y 
tel^fonos uno a conunuaddii dc otro. 

. que los dimincitiLK con una simple 
cachadura cuuiido yu no nns vnfcji, 
Lste proeedimieitio nos ohli^n a coger 
la lisia dej.de el principto v *piisear eE 
(Icl'Il.]>* h.mtci que cncorvlremos Jo que 
huseamos sin que haya unin dik'Tcncic 
eon utih/ar unn uiiendit eon di^iric^i 
cion altobcfka. A la bora da a/iadir 
nomhrcSn si 3a lists no es muy grande, 
pueden colocarse al lieul d «cnlro 



prog r(1 ***** c * °^- 


rcngloncs y.i exist entes y cl procedt- 
unicnto fundonm 

C'uando se irata de locality* infcir- 
ntficiGn sdwe bis diferentes panes de 
un libro exists tsnfibien La posibiJidad 
du «bojearlo*> husta eneonirar la in- 
fbrmuCiOn que nos- interest. .urn 
cuando este proeedi mi-en lo no us 
aeons* j able si el litiru es de un cicrto 
tamarto v> si bis con suit. is son frccucn- 
les. La sol uc ion adecuiidn cs dispone r 
de un «dncttce» dandc sc hallen clasi- 
ffcadas por orden JfabeLico o leniii- 
iico los aspcclos que nos inleresan 

Hstn neecsidad da ordettacitin, j/r- 
dexacitin, btfsqueda e inelusiAn se 
pone de manifiesto li la hnra del tna- 
riejLi dc bJoquci- de informarirtn {fi- 
vhcros.) pur los. ordenadores Todas 
cstas operacicutei pueden hacerse di- 
rectimeute en memoria Central o in- 
cIumj en eJ propio diskette (o disco 
duro), En c^tc ultimo easo podremos 


obvi.tr las liniitadortes dc In mcmofia 
pero a cos La de uji alio prccio en el 
de.sgiHSie del materia] y sobre todo en 
los cicmjMKs de respucsta. 

El manejo de dates en memoria cen¬ 
tral puedc hacerse t'undunierituJniente 
con ayudo de vahubJes subindicadte. 
(namtfricas o de caraaercs), variables 
simples de caiactcres ydi&o RAM. Nos 
vomos a ccfiir a Eas prime nss por ser 3as 
dc uso mas gmcralUwJn. 

Qiando kiblanuts de variables sub- 
indicadasi nos referimps 3 vwtorm f7is- 
tas), matrices (it r/r)i (iimtmiones ite- 
blasf y a extrurtiirax dt ft fcLt de ire. 1 dr- 
ntfmiipjiH. si bicn estas ultimas por 3o 
general sc dcscomponen por coniodi- 
dad cn matrices bidimensionaics. 


GUSQUEDA E INCLUSION 

La busqueda en una Jisia cs +se- 
cuenciaU cuando para cncontrar un 





























Proqrgn»° cio " 


determinado namhrc (o valor mimf- 


nco) set comicnza par la primcra pa- 
sicibn y sc van anatfeando lodes hasia 
que sc cncvienlra la que busc&mot. a 
Kasta -el final de Is* Sista en el eases tie 
que pucda hubcr mas- dritlctllw que 
dim plan lit eondieidn snipii l:>Lj I por 

ejenipto, fodos las nombrcs que co- 
mlencen par MART). F.ste procedi- 
mlento es sblu sdccuada Cuflnda I si 
lisia estA dcsordertada. 

LI meeanumn Je busqueda cn nnsi 

mauiz AS( ) »;(i: 

10 FOR 1=1 TO n 
20 IF ASCI)-" nombre buscado " 
THEN PRINT i 
30 NEXT i 

Las sucesivos valorem de nos in- 
dlearfan los Indies dc apariddn del 
nombre buscado dentro dc la Lrsta. 

Si dispanernos de una lisia ordenada 
podemos bacer ima busqueda mds rfi- 
pida median c un sistema ^dicain- 
mica*, «binario»“ n dc <'Cortr*. Sc 
ioma eE valor central dc la Jistu y se 
com par a con cl que estamos bus- 
cando bi C*-tc ev men or descarMniuv 
la seguuda mi tad lie la I is* a y repcli- 
mos el proceso dividiendo por lu mu ad 
hasCa que M! quedcmoien un solo va- 
lor. Si esce uhiruo valor es igual a I que 
buscamos habremos Mladociiqu-e In- 
gar empreza cm la triia y padre mos tra¬ 
cer, a partir dc cstc pun to, una bus- 
■queda SCCUCncral dc valorem iguales 
hasca que aparezea wn valor disci nto. 
Tdtibitfa pudiera ocurrtr que cl nom- 
bre que huscamos no exisla, pero a I 
memos sabriamos d6nde dcbcriia apa- 
rcccr dc haber estado cn la listai 

Una rurina para esia busqueda 
puede scr; 

1 LET N=10:REM ELEGIR 
NUMERQ DE ELEMENTOS A 
EXPLORAR 

10 LET P -1:LET U=N LET 
R^U 

£0 LET R=INT({U-R)/2):LET 
M=P+R 

30 pf n<~mm then let 

P=P:LET U=M 
40 IF XS>A %m THEN LET 
P—M+liLET U=U 


50 IF P<y THEN GO TO 20 
60 IF XS=ASCMHHEN PRINT 
X$+ ir AFARECE EN m ; M 
70 IF X$OAS(M) THEN PRI NT 
X$+" MO EXISTE EM LA 
USTA" 

Ehlu prucedLinicrtro de btisqucdil es 
rcnlmcntu rripido. El mlmero dc pa- 
sadas depende Lie la longmid dc La 
Iota. 

pfl normal que cn itlgurt nlOfflCIltO SC 
presents Psa nccc^idad de climmar a 
unadir algiiti clcmcnlodc In lista. Con 
cl proccdimicnlo dc busqueda binaria 
■sabremos ddnde etimiiw y prncedcr 
al correspondienlc «conimicnlQ» pyra 
ocupar cl evpacio vacJo e igualmcntc 
ddndc caliKar cl tiucvo valor h ha- 
cwndo el ■(hucco» contspemdiente 
|.a verrtaja nnJica cn quc cl nuevo va¬ 
lor que anadaimiH queda yaordenado 


ORDENACfrON 

Un cjcmplo de l l oei jliEiio dcsordc- 
nado seria un mazo de cartas «bien ba- 
ra j ado». 

Una liSitn ekeimos que csr^t ordc- 
nada cuandc? sus cltmentos sc halliiu 
dispucsios uno n coptinuaddn de olio 
slguicndo un criteria, uimo puede ser 
cl tillabdtLco. Los ordenadarcs utiliz^in 
par to general cartio rcfCTcncia el cd- 
diga ASCII domic las numeros tienen 
valores inferitires- a lav Iciras inayus- 
cylus y iftsui a las miodsculas (prieti- 
camcnte todris Jas marLualcs de orde- 
nadorcs disponen tic una i»Hla AS¬ 
CII), 

Existed varios tnctodos a pmeedi- 
mientos de ordenacirin («sortirig* cn 
la liter aiuru mglesa). Cada uno tic 
cllos trenc su<v peculiar idades y una rc- 
comenvtacisin roncrcLi L’fiOS son IUhV. 
Mciles tie romprender y programar, 
oiros son mas rapidos ;t casts dc uti- 
li/.iii ieuis memoiiLi RAM. alias, pttrcl 
eontrario, son paroas cn cansuma tie 
mcmort:i pero iii^h lenios. etc. A can- 
trnuacidn comenlaremos atgunas de 
cllos de forma que podamos Sfecar 
unas ideas dams L|ue nos permllan 
ayudarnos a programur nuestras ne- 
cesidadcs o juzgar algunas rutinas 
existentes- Al final f]gur;i un programa 


dondc de unamanera graFca podemos 
experimenter ct>n b urdenacion 


METOOO DE SUSTiTUCION 

Suptrngamos tina iisLa («VCCIor» u 
matrij!. dc una ditnentLOn) de ans ele- 
mentQs- 

F-t m^ioda cansiste en ir compa- 
randa cada elements can lodos las 
que Ec sigucn (1 con 2, 1 can 3, I can 
4, etc. ,permutandolossi cl seguiittocs 
mayor que el primero, Al final dc la 
pasada el primer demento sera d de 
mcnor vabsr. Ett pasudas succsivas se 
rep He It i mismo pero desde el SCgundti 
Jugar (2 con 3, 2 con 4, 2 cort 5, eLc.) 
v lisl sgeesivamenLC- Una vC/ tentli- 
nado cl cicln la lista qucdarA ordenada 
de mcnor a mayor. 
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Li [ma a ordennr sc L-arjii en In ma¬ 
in/ ,-\$r \ dc djmen^n - N - y la ru- 
tina de ordenacLOrt scriu: 

1G LET N = 5:DIM A$(N, 13) 

20 FOR 1 = 1 TO H -.READ 
A^ithMEXT I 
30 FOR 1-1 TO (N-l) 

40 FOR H=l + 1 TO N 
50 IF A$(L)>A$(H) THEM LET 
C$=A5{f>:LET 
A$(1)=A?(H):LET AJ(H)- 
C$ 

SO NEXT H 
70 NEXT | 

100 FOR 1 = 1 TO N PR I NT 
A$(I):NEXT hSTOR 
110 DATA "CFVAAVDE 1 , 
1 „ SE ,.^ zr 


B»te seri.i d aspcetn de las diverts 
pasadiis del proceso; 

(CF)(AA)(AA)(AA) AA AA AA AA AA 
AA AA 

(AA) CF CF CF (CF)£CF)(CF) CF CF 
CF CF 

DE (OE) DE DE (DE) DE DE 
(DEJ(DE) DE DE 

SE £E (SE) SE SE £££) SE ISE) 

SE (SE) SE 

ZX ZX ZX (ZX1 ZX ZX <ZX) ZX 
(2X)(Z)0 ZX 

Esla metodo es el mils. elemental c 
ini uiiivo. pc jo sin Inga t a d Lidas, el mis 
Lento. CuamJu foiknioH d programa 
lIc dempfilnidi'm dtl final vc rcnnv, q uC 
parti un niimero rcducidn dc de-men¬ 


tos ptiede ser sufidemeineme rdpido. 
En esie programa aparece el procesu 
a vetocidad normal (muy rapido), ra¬ 
le mi undo por cl heeho de aparceer en. 
pnnlfllla los. diverws pasos (rSpido) y 
ralentizado a prnptmio para ver en 
-Camara lenla- cl proceso flenlo), 


METODO DE LA «BURBUJA^ 

Oio/.i es Linn tie los meitMlni inis 
pnpu laics. CunsiHIc efl r eompiiiundu 
parejaS ^SUCCSavas^ de valnrus (ly2„ 
2y3,3y<...9yID)c jntereum.harlnH hi d 
pnmero es mayor <jue cl segundo. AI 
final dc la primern pasadn ct ultimo 
valor ser& cl mayor ds- la lista- I .a sc- 
gundti pasada sc hari- por lo l an to para 
un valor rtvenos y asl suceshtamente. Si 
la orderraciAn sc hace dc mayor a me- 
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nor, las piisadas sucesivas min «ascen- 
Jiendci» los niimeros menores como si 
sc uatnse dc 3a* burbujas de un liquido 
y de ntn hu nombre. 

St n] final dr una dc In h pandas no 
VL- hid producido La necesidad de intcr- 
cnmbio dc valores quierc iiecir quc la 
list a entera esti Grdeiiada y sc puede 

suspender el process cor el mmsi- 
jtoiente aborro dc iicmipo. £sta cs una 
dc las vcniajasprincipfiies. Sn usocstA 
indicado par tanlo cn nqucllos cases 
ert uue La lista a grande pern cma east 
urdenada (par ejettiplu al a nadir un 
clcmenlo a una lista ordenadu). 


I = N-1 # 

70 NEXT I 

100 FOR 1=1 TO N:PRINT 
AStOiNEXT l:ST0P 
110 DATA "CF", 4 'AA rl , "DE ,r , 
"SE". H ZX” 

lime serta d aspeeto de las diversas 
paia'J^, del proceso 

<GFS AA AA AA (AA) AA AA AA 
(AAKCF) CF CF rCFXCF) CF CF 
OE (DE)(DE1 DE OE (DE)(DE) DE 
SE 6E tSEKSE) SE SE {SENSE) 

ZX IX ZX fZX) IX IX IX (ZX> 


el vegnfldip e«n cl mitad mas uno, 
ere,), AI finnl de la pnmera pasadsi In 
lista habri quedaio nrdcnnda dc una 
matiera ■alternada" Va Nando la re- 
fcrencia al valor an tern dc La mi tail dc 
la referenda anterior em formas sues- 
sivjs sc Llega a nna ordenacidn has- 
tame mas r&pida, aunque realmemc 
no sc puede aprcciar so justo valor 
masque cn &6digO mitquma. F.n Basic 
la lentitud de los bucles enmascara slis 
vcniajas 

Para cl rmsmo caso anterior: 

10 LET N = 10:LET D=N: DIM 

A£TN. 10> 


10 LET N-S;D3to AS(N,10) 

20 FOR 1 = 1 TO NiREAD 
ASUbNEXT I 

30 FOR 1=1 TO {N-lbLET k=0 
40 FOR H = 1 TO (N-l) 

50 IFAS(H)>AS(H + 1)THENLET 
C$=AS(HJ:LET 
A$(H) =A$(H+1); LET 
A${H+i)=C£:LETk=k + l 
60 NEXT HeIF k=0 THEN LET 


METOOO «SHELL« 

Existcn variantes de cslos irnftodus 
Lomn puede ser cl denominadn 
«ShdU. en dondc cl aumtmto dc vc- 
toeidad es considerable. En cstc caso 
sc wma como referenda Ea niLiud dc 
la lista y sc van hacicndo eompanieio- 
ncs ernre pare jas separadas d valor de 
la referenda (cl primerocon d mitati, 


20 FOR 1 = 1 TO N READ 
A${t):NEXT I 

30 IF Dol THEN GO TO 100 
40 LETD-INT(D/21iLET F-N-D 
50 LET Z=0 
60 FOR H= 1 TO F 
70 IF AS(H)>A$(H + 0) THEN 
LET C$=A£(H):LET 
A$(HJ=A${H+D):LET 
A$(H + D)=C$:LET 7=1 
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80 NEXT H 

90 IF Z>0 THEN GO TO 50 
95 IF Z<=0 THEN! GO TO 30 
100 FOR I-I TO N- PRINT 
A$(I):NEXT I: STOP 
110 DATA H SERT M P ,J DERT" h 
"CFGT M , '2SDL \ "AASER”, 
li XSD , ' 1 J, DE'\ 4, SERTT i 
'TF'\ “AZZW" 


METOOO nSHELL-METZNERii 

Sc trata <tc una variants del mitodo 
”Shcll» con cl etnsl sc consiguc una 
mayor vdocldad 

Para cl mismo easo anterior: 

10 LET N-10;DIM AS(N, 10) 

20 FOR 1 = 1 TO NiREAD 
ASflhNEXT l 
30 LET D=INT(N/2) 

40 IF D<1 THEN GO TO 100 
50 LET F= N-D 
60 FOR 1 = 1 TO F 
70 FOR H = ! TO 1 STEP-0 
80 IF A$(H+d)<A${H) THEN 
LET CI™A$(H)jLET A$<H) 
-AS(H + D1:LET AJfH + D)^ 
C$ 

90 NEXT H:NEXT I 
95 LET D = lNT(D/2):GOTO 40 
100 FOR 1=1 TO N PRINT 
A $ [ I): N E XT ISTOP 
110 DATA i, SERTVDERT' , 1 
IL CFGT", ''ZSDL 1 ', ''AA5ER”, 
"XSO' f , H DE\ “’SERTT, 

"FP t "AZZW 1 ' 

Como curinsidad, snbre- lock* si no 
dispememos dc ordenador, podemos 
experimentar los mtnxlos anleriorcs 
eon ay Lida dc las cart as de Lena baraja, 
ElegLremos por cjemplo cinco cartas 
cualqmcra y las toloearemos vertical- 
mente v horimnlalmcntc y luego Ins 
ireiTIOS moviendou iqlcrcaifibiaTido de 
aaicrdo con las indicsciones de hi ru- 
tina correspond icnlc. 


QFDEIMACIQN RAPIDA 

Ha si a hKcm~h herruM tonsiduradu 
stilo l a posibilidad de reor denar la pro 
pij matriz, sin rtingun gasto adicional 
■de mernuri a. 


Si nos encomia mas con un cajbn 
Lie no de Teh as qne hemos de elusifi- 
car. como mdtodo alternative a la rc- 
clasificacion cn cl propio cnjdn jx>dc- 
mu* ^cgmrcl proL-ed im,Lentd de tnmar 
Giro cajdn vaeio e Lr pasurulo ficitas del 
primero nl segimdo pero dejandolas 
ya cada un&cn <.u Lugai. EE proccsocs 
evidenlemenie mis i:ipido y no hay 
que Jar crnias vueltas a lu> fkhas, 

Con un ordenador d prootso es 
anilcugo. Necesitaremos erear orra 
miiUii: auxiliat de eapaetdad adecuada 
(si la Lista es grande podemos tener 
problems de memorial a dondc i re¬ 
mits pasando unu ,i una bn posicinncs 
de la primera malriz ayudondonos dc 
una biisqueda hum n.L para hacer la in- 
elusion en el lug^r oportunu 

En cl casci- dc list as con v .’trios cam- 
pos en eada registro o tablas [matrices 
de dos dimcnsion.es) puede surgirnos 
la necesidad de ordcnarlas segun di- 
versos enterics lapellidos, profesio 
ncs. callcs, numcro de clicnte. clc.), 
Bastarfy con hacer tantos proeesos de 
ordenacidn como fucra preciso Cal 
como « ha visto en el apartado ante- 
rior. EE tanaco problema serfa el ele- 
vado volumcn dc irtlormacum redun- 
daiilc que tcEidrianu.i'S t|ue mattejiat. 

Lu ncirmal Cn cstc caso seria cou- 
servar la lista (matriz) midai y oonfec- 
ctonar iantos -^tndices^ como sea pro- 
ciso. Cada indite esian'a compntrsio 
por una referenda incijuivocii ino val- 
dria un apcltido. ya ljuc puede halier 
mils dc un dienie eon el mismo nom- 
hrc. St valdria cl D.N.J. o cl niimero 
dc elicnte) y cl CMntcnido del eumpo 
respect ivu. hecha la ordenariOu CO- 
irespondientc. Por cjcmplo. eE ruj- 
mcro de rcfcrencta dc cllcntc y los 
apel]idos f o cl ml mono de lelffono, o 
In ciudad, etc. L’no de bs indices serin 
tambien el mimero dc clJenle as<xiado 
nl numern de ordert qun ucupe esc 
ciicntc cn la labhi bdsiCa. 

Cuafldo dcseemos sylntr cl numcro 
tie tel-efono de un dienle en particular 
iriumtis primero a En matrii de «[ttdice 
apellido>- v huH'iinamys numcro 
de eliertte le corresponds A connnua- 
cbn eonsultarfamos el «fn<(ke numcro 
de eltente:c. el coal nos tnformarfa 
dbnde eaeonlrar la fichu complela de 
die ho eliemc. incUndo su tclcfono. 


Esin Forma dc procedqr, iiLLnijne un 
piyco Inbnftnsa, es hi liniiza que nos 
pcrmite mane jar Lin gran voLnmen dc 
iiyfnrmacton con un consum.0 illWtili- 
bin dc memoriu. 

Las Buses de datos haccn u$o de es- 
tos principles manejandn informatio- 
nes almacensdas en ficberos resLJen- 
tes en disheites o discos duros ctm Ujh 
correspondtcntes pasos por memorlu 
central 

Lo normal cs t|uc los indices sc va- 
yan nctuiili/ando automat icamenie a 
medida que SC anude o c'limina infor- 
mneidn dc la base de diitos. 

Como hemoscomentado, incluimos 
un programa qnc muestra et funcio* 
nanaienio de los distintes algoritmos 
dc ordcnacidr El objetbo del misnni 
es, sobre todo, ser didictico En la 
puntalki se mncsSru psiso a past* cl pm- 
ccvi> de orJe-rtadttn lIc una labia Je SO 
clemcntcs, 'Fee lea lo, expenmcnla j 
s;ica tus conelusioncs sobre venta- 
jafi dc utili?iir miio u olro mctcKlo 

20 BORDER 6: PAPER 6; INK 0: 
CL5 

30 DIM Af(10 p 5)i DIM S$(10.5); 
LET C$ = M MET 

T$=C$+'' LET 
G$-T5+'' ™ 

100 REM FOR MAC ION OE LA 
LJSTA 

120 PRINT AT 17,0, 
"INTRODUZCA OIEZ 
NOMBRES^ 

130 FOR 1-1 TO 10: INPUT 
"NOMflRE ? (max. 5c.) ,p i 
A$(l): LET B$(I)=A$.(I): 

140 PRINT AT L0J;TAB (4h 
A$(l)t NEXT It BEEP 1.10 
160 CIS- PRINT "QPC1QNES 
METODOS ORDENACFON'”: 
PRINT - PRINT 
170 PRINT M I 

SU5TlTUCI0N„{LENT0) rl 
1S0 PRINT "2 

SUSTITUC ION.. (R API DO)” 
190 PRINT "3 

SUSTITUCI0N..(MUY 
RAPlOOr 
200 PRINT r, 4 

BORBUJA. .,{ LENTO)" 

210 PRINT "5 


INPUT 23 















aURBUJA.„.„(f?APlDO)" 
220 PRINT "6 

BURBUJA.„....fMUY 

RAPIDQ)" 

230 PRINT : PRINT ■ PRINT 
'■ PULSE OPClON' 1 
240 LET P$=INKEY|: IF PJ= Hn 
OR P$> M 6" THEN GOTO 
240 

250 LET P=VAL (P$): IF PU OR 
P = 2 THEN GO SUB 30& 

255 IF P=3 THEN GO SUB 350 
260 IF P=4 OR P=5 THEN GO 
SUE 400 

265 IF P = 6 THEN GO SUB 500 
270 GO TO 160 
300 CLS ; GO SUB 2000. GO 
SU8 2020; GO SUB 620 
310 FOR N=1 TO 9: FOR 
H=N+l TO 10 
315 GO SUB 1000; GO SUB 
2020; GO SUB 760 
320 IF A$£N)<-A|.(H) THEN GO 
SUB 990; GO TO 330 

325 IF P=1 THENGOSUfi 700; 
LET S£=A£(N): LET 
A5(N)-A$(TI); LET 
A$(H)=S$ 

326 IF P-2 THEN LET 
SJ=A${Nh LET 
A$(N)=A$(H) : LET 
A$(H)=S$ 

330 GO SUB 990: GO SUB 
2020; GO SUB 1000 
340 NEXT H: NEXT Nr GO SUE 
2020; GO SUB S3 fc PRINT 
AT 19.0; rt CU ALQUIE R 
TECLA PARA SEGUIR" 

345 IF |NKEYS^■ ,,, THEN GO TO 
345 

346 RETURN 

350 CLS : GO SUB 2030: GO 
SUB B20 

360 FOR N«1 TO 9: FOR 
H=N +1 TO 10 

370 IF A$(N)>A£(H) THEN LET 
SS^AS(N); LET 
A?(N)=A$(H); LET 
A$(H)=5$ 

3£0 NEXT Hi NEXT N: GO SUB 
2020; GO SUB B30- GO 
SUB 300: PRINT 


XUALQUIER TECLA PARA 
SEGUIR 1 

390 IF lNKEY$= h,r 'THEN GO TO 
390 

395 RETURN 

400 CLS; GO SUB 2000= GO 
SUB 2020; GO SUB 620; 
LET R=9 

410 LET S = 0; FOR N = i TO R: 
LET H=N + 1 

415 GO SUB 1000; GO SUB 
2020; GO SUB 760 

420 IF A$(N)<AS(H) THEN GO 
SUB 990; GO TO 430 

425 IF P=4 THEN GO SUB 700: 
LET $$=A$(ft): LET 
A$£N)-A$(H): LET 
At(H)=SSi LET S = S + 1 

426 JF P=S THEN LET 
S$=A£(N): LET 
A$CN>-A$(H) : LET 
A$(H.I=S$: LET S=S + 1 

430 GO SUB 990; GO SUB 
2020: GO SUB 1000 

440 NEXT N; LET R = R-1: IF 
R-0 OR S<>0 THEN GO 
TO 410 

444 GO SUfl. 2020: GO SUB 
S30: GO SUB 300: PRINT 
"CUALQUIER TECLA PAPA 
SEGUIR 1 ’ 

445 IF 1NKEYS = rlH THEN GO TO 
445 

446 RETURN 

500 CLS; GO SUB 2000: GO 
SUB 620: LET R=9 

510 LET S =0: FOR N = L TO Rt 
LET H = N + 1 

520 IF A$(N)>A$(H} THEN LET 
SS-A&N): LET 
AS(Nl«AS{H): LET 
A$(H)=SS: LET S=S+1 

540 NEXT N: LET R=R-1: IF 
R-0 OR S<>0 THEN GO 


TO 510 

544 GO SUB 2020: GO SUB 
830: GO SUB 800: PRINT 
''CUALQUIER TECLA PARA 
SEGUIR 1 ' 

545 IF INKEY$=’ r " THEN GO TO 
545 

546 RETURN 

700 GO SUB 990: REM CAMBIO 
710 PRINT AT H,1S:C$;TAB 
(25); AS(H); GO SUB 990 
720 PRINT AT H.18; A*(N) ; TAB 
(25); C$ 

730 PRINT AT N,18;CS;TAB 
(25); A$£H): GO SUB 990 
740 PRINT AT IN, IB: A${H); TAB 
(25)iCS: RETURN 

760 PRINT AT N.1Z; "-> " 

A$(N); AT H .12; —> 

A${H): RETURN 
820 PRINT AT 12,3; ''L-OKiG 
PROC. OE OR0ENACtON ,F ; 
RETURN 

330 PRINT AT 12,3; "L ORIG 
LORD <f : RETURN 
990 REM RETARDO40 
995 IF P=i OR P=4 THEN 
PAUSE 40 

998 IF P=2 OR P = 5 THEN 
PAUSE 1 

999 RETURN 

1000 REM BOR RAD 0 PROC£30 
OE ORDENACION 

1010 FOR |=1 TO 10: PRINT AT 
US; TS; NEXT It RETURN 
2000 REM LISTA ORIGINAL 
2010 FOR 1=1 TO 10; LET 

A*W=B$(!J; PRINT AT 1,0, 
U TAB (4); 0¥(|); NEXT I: 
RETURN 

2020 REM LISTA A CLAS I FI CAR 
2030 FOR 1 = 1 TO 10; PRINT AT 
M2; AStIJr NEXT Ir 
RETURN 


Si hart* ilifii it <'iit-Mninir TWIT 
rn In liahiluaL 

n^rniiln pur arirlunliiiiik n hii/iHi>lii *iihrr 
fiaiu if hi* podkinm*, nMiirdiHiin 
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En INPUT estamos convencidos de que aun 
puedes hacer muchas mds cosas con tu 
ordenador, Sin duda, muchos tectores estareis 
ulilizando vuestro micro para funciones de lo 
variadas, en unos casos; pintorescas, en otras; 
mjeniras que aJgunos listiflos habran podido 
utilizarto para resolver tareas compfefas. Es Idgico, 
modificando programas y variando los penfdricos 
nuestro ordenador puede prestar sus servicios en 
rnfmfdad de facetas. INPUT quiere que esas 
aplfcaciones y utilidades a las que has conseguido 
dedicar tu ordenador, sean conocidas por todos 





sus leciores y por esa ha orgamzado el «Concurs© 
de Aplicaciones y Utiiidade$i> h en el que puede 
partiCEpar cuaEquiera de nuestros lectores. 


UTILIDADES Y APUCAdONES: St lu nrde- 
nadur Controls la calc faction dc (U CMk, gnh-icmjt 
■un r«ihot. tli rift un pcquerio negncin. iiir&iniv i In 
inn(|iic[A d? lu Iren cUctrico, o cualquicr eraa m- 
tercsa.EU'e u original^ envtanos information urtifieLi } 
liSigtluH dc tttt programs. grabados cn un cassette, 
diskette o micro drive, 

Todo eLLo JiabEi dc venir acompuriudo por un 
lotto l[uc aclare cuAl es su objetivo. el modo de iun- 
donum icrnci v man cxplicadtin del cornel ido L|ue 
eumplen tas dbiinras ruiinat que lo eomponen. El 
testci su prd^entairJ en pupel dc lurflisrtil folio v rile 
cailpgrafindo a dn-s espadm. No import;! ijuc Ed re- 
daocidn no muy data ycuklada; nuestro equipo 
de expertos se encargari de proportionsrlc la forma 
mas at roc Live, p&sible. 

UN II5RADO propio decidtrtl en cad;i moments 
qu£ colaboradones rctinen los requisites adecuadm 
para stt publicacicSn. y evaluara 1 a cuan tia del pro 
mio en mCialidO :iL que hc liiLyaa aerctftoras. 

No olvideis indicaf daumente para qu£ orderLa- 
dor estfi pneparodo el material. asi como vuestro 


rtombre y direocidn \\ euandn sen posible. un 1 de¬ 
fy no de conlacto. Enlre todos los irabajas rccibidus 
durante los prdnimos Ires mcscs SORTEAKIt- 
MOS: 

• Un premio de SO.000 ptas. 

• Un premio de 25.000 ptas, 

• Ln premia (Is 10.000 ptas. 

trn material mierttlrifornidlicu a deyjr par 
los aroiiunadusi. 

jN« us dcsjnimcis! h ptir muy simples 0 trtfrnplejus 
que puedut) pareeer vucsUas ideas, Lydiui estAn rc- 
vlsadas con oil maxi mo interns, 

INPUT SINCLAIR 

Aribau, 185. Planta 1, 3 

03021 BARCELONA 

NOTA: INPtT no « ne-SFHir.^.Lhil i?-ji Uj In dcvsiluriiia del hlh- 
Icriil que n* Vityu fl«K 1 l}N»niadii f<V un vjhre udecuaiiu cun el 
frflnqu«n cnsrTfliptwdientc. 


INPUT 25 














p^grbrno"®" 


REFINA TUS GRAFICOS 



Una vez que dominas Ins rudimeEi- 
iqs del dibujo dc irnGgcncs en panci- 
IIj. puettes einpezat n ampliar cl 
campo lie tus csfuerzos artfclicos, uh- 
lizando algunos de los eomandos grA- 
frees especiali^adoi de que dispone Eu 
ordenadnr. CoEnandus tales COrtlo 
MOVE, PLOT. DRAW y CIRCLE, 
le pcrmtlcn dar nenda stwHa a iu eis ia- 
ginacidn, crcando cualquicr tipo de 
EiEE^igenes. desde ungrtifico de lipoto- 
mcTttaJ hasta eltiuccnarin de ioiuJo dc 
una cmocionanie aventura, 

En arllcutos anlerrores ya vimos la 
pnancra de uiHiznr Los sc nci I Los coma n - 
ties tic dibuju para cfear un 3a pantalla 
irna Irene* j base de lineas v, en deier- 
mulattos CHS04. anadirlc el color. Peru 
iu puedcs ampliar cstas tfenita-S com 
nuevos mdtodos para dibujur puntns, 
Ifneas. trLfrigulos, cuadnrfos y eiretj- 
los PichQS meiudos, ulilizados cl Los 
soEos o cei combinacidn COB los Colo- 
res, se convicrtcn cn un podemso me¬ 
dio dc gerieracion do rmagencs e&titi- 
caH o Lneluso en movimtento. 


CIRCULOS Y ARCOS 

Los cfrculos y los arcos figuran enue 
(as «herrami£nlas* mas u tiles. para dii- 
hujar gr&fico* eseAIel-os de pantalla con 
un Spectrum. 

Li siguiente program a del partido 
die golf mdflStra la nianera dc uidiznr- 
los para dibujar Jirboles, eereas, agua, 
hnyas y aren a Its. a La ie? que permits 
describir los prirveipios que rigen enic 
lipo dc repTO Wtiacioncs. 

Pucdc* comprobar cus progresos a 
metUda que vas avanzando, ejecu- 
lando cud a grupu de Imeas. No hagas 
un NEW' cn (ti Wlfiqtlina despuSs dc 
Ciida cjccuciAn; si dejas las lEtteas in- 
laetas, icrmiriaris con la escenu de Ea 
figura L. No obstante, antes de cm- 
pc/;u con los cl'rculos. es rnejor que 
■iaques el chalet del enminn Empicra 
pucs tecLcando las siguiertlps Linirjis: 


90 BORDER 4; PAPER At 
CLS 

200 in W^103 LET S = 50 
300 PRINT INK 0|AT 2.2;" ":AT 
2,4 : hi '^AT2.6i" 

230 DRAW INK 2;S.0 

240 LET W=W + 2j L^T 5 = 5-4 

250 NEXT C 

£60 FOR 846 TO 162 

270 PLOT INK 2; 10.B 

280 DRAW INK 2:50,0 

290 NEXT B 

295 DRAW INK 2;I0,-3: DRAW 
0.-il 

300 PRINT INK 0;AT 2,2r' P "AT 
2,4;” ";AT 2,6; ri " 

Las LEneas 200 a 25(1 dibujan el (e- 
jfldo. EmpiLV.is cn d punln IU. 162 de 
la p,mtall,L, eon mu Line a de 50 pixels 
dc ancha. A COnti nuacidn ^u unchura 
disminuye en 4 pixels por c^da pixel 
de ^ubida. Un bade semejante t|uc se 
e^Eiendc entre las lineas 260 y 290, se 
ceupft dc dibujar las paredes con dos 
lincasadieionalcs (linen 395) para for* 
mar un porchc, A continuacidn la LL 
nea 3WJ se encarga de las venianas Je 
Ea forma rttiis simple pnrsibjc, Ltnpri- 
rnicndo por ties vec-es en las parcdcs 
un cuadrado wgra uirnudo dc los ea- 
ractcres ertifreos de ROM- 
I ji forma m4s sencilla dc dibujitr un 
clreulo compteLo en cl Spectrum es 
u l i Liza r on enmundo CIRCLE. Pero si 
solo q uteres tener unu pane de un cir- 
L-ulo. Iu forma mas seneilb de conse- 
guirEo C$ utilizer ademris una sentencra 
DRAW oonvcncional. Variando csta 
scniencia puedes conseguir una canli- 
dad enorme de efenos, por lo que 
oonvlauc que experiments un poco 
antes dc segmr mas adebme. Ensaya 
por ejcmplo: 

10 PLOT 130,30 
20 DRAW p. 10,1 
30 GOTO 20 



( No te preocupes por cl mensajc Je 
error). 

Como tc habrf4 dado enema, lov 
dos primeros numeros de la iTnca 20, 
dieen al ordcn.idor que ttibuje una li- 
nea a purilr del pumo reclfin dlbujado 
y estentlhfndose hast a llcgar a un 
pnnto siruado ID pixels mAsanriba. El 
ullimu rtiimerO hacc que esEa luiea sea 
LTurva, qn vc z Jc jr en linca rcclu. El 
radii) dc eurvalura oblenidt) depende 
de Jo grande o pequcfio que sea el nu- 
mcro- Estc miincro indica al Speer rum 
que dibujc parcialmentc un ciTeulo, HI 
dreutn complelo cst/L FcprcsenLado 
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i.os ordenadnriis doi^iw ofr^nn 
muchas posihiliduric* para el artista in 
ckrric^ Aqut [it'Jits uiiiw fiiitnlaM slleP' 
rrmias para amptiar d llhc» dr lu\ co- 
mandcwjirSifit'Lfj.'drl BASIC \ drear ntie- 
ves imAgenes de panualla, 


■ ESINAS QE LA PARTI DA 



Of GOLF 

■ 

IMA6ENES CON CIRCULQS 


Y ARGOS 

■ 

A R0OL£SV AH BUSTOS 






por l' 1 producto tk 2 jxrr n. con l<? cual 
el tiumero J hacc quc sc dihuje apro- 
limadMMnte In scata parlc dc un clr- 
culo (exaetaniente « dibuja la frac- 
drtn t. r in del rfreulo}. Si iniemas cam- 
biur la I I nga 2U pur la sijtuidtlte: 

20 DRAW 0,10,2 

le enronlrads eon una serie de curva^ 

mas pnonunciadns. AniLoganiente, 

con 0, HI. 3 obicndnis una figura cn 
die me de Menu, con 0, in, 4 tendras 
parte de un cierrc con eslabones de ca- 
dena (o medio cronco de palme-ra, su- 
j£un como lt> mires), mieniras quc dan 
(1 10, G le reiultura unu g spiral. Si por 
cl oonirario tceleas 

20 DRAW 0,10,2 T Pi 

puede quc tc I[uvus una sorpresji Lo 
q Lid cl SpdClrum pretende lta.ee r cH. di¬ 
bit jar uncErLulu can dos Uc sus pumas 

en linen KCtn. Pcro coma dicho ctr- 
eulrt tin enbria en in cuarto de eslnr 
—en realidad no cabrfa en todo el Sis- 
luma Solar—sdlo dibuja unu parte del 
nmmtx Para dibujat un paisaje, en- 
iiiya Ili signienlc: 

10 PLOT 0,100 
20 DRAW RND*5+5,0,2 
30 GO TO 20 

Con e*iu conseguirSs dibujar cl 
ole-aje de un mar agiiado, Para idler 
apuitk mas irunquitas, ensaya HMD* 10 

+ hi, o tnchuvo rnitms + to. 

Lin pun to imptirtanie quc Uchcs rc- 
eardar en relation con «los arcos. es 
quc un mmicro negative al Iml de tu 
linca DRAW hara quc sc dibit je In 
'maucu espcoilar del correspondtcrnte 
arco. Borra ahora las Ifrceas. 10 a 30 v 
esvtria cm condiciones de const mar la 
cSCSlin dc la parlida dr ^oLF. 


LA CERCA Y EL LAGO 

E3 prognniui de la part id a de golf con- 

itenc dos ejemploh dc areos ulilizados 


INPUT 27 







































Progw« naei6n 





Utilization de iin-ts cirittlt/S fhirtl itf partjda tie gitij 


como cfccios gr?Hc<K- el primern cs el 
de hi pcquena ccrea quc hay cnfrcfflt 
del child; nl segundu h cJ lapo, 
Frimeramenlc redea esius Ifneas: 

310 FOR F^0 TO S4 STEP 3 
320 PLOT F, 142 
330 DRAW 3,0,-3 
340 NEXT F 

345 DRAW 35, -42= DRAW 

-12,-G 

El puii Li. ■ de |'i. : i [ i i J:.i sobre la pnta- 
IJ k es cji este ease 1.1,142. Lu que feace 
Li line a 3 TfJ cs dihujar una seric dc ar- 
cos muy pococunw —cfi rcatklad son 
scmicircuJos dc sdlo ires pucls dc an- 
churn— pnro fnrmar la ccrca. El rui- 
mero tola I csl4 gnbernado porel bnclc 
FOR ... NEXT. 

A contimjacidn. tcclea y ejccuta las 
siguicnlK lineas: 

100 LET X=130s LET Y=125: 

LET 2=50 

110 PLOT INK 5:X.0 
120 DRAW INK 5iY,Z 1 -1.25 
130 LET X=X+li LET V=Y^li 
LET 2=1-1 

140 IF X>254 THEN GO TO 170 
150 IF Z<1 THEN LET Z=0 
160 GO TO 110 

Esta llgura cs ya mils complicada. 
En primer Iuaar cl ardenadnr dibuja 
lid puniu sLlu.iJu a 130 pixels desde la 
i/quierda y a U pixels desdc el fondo 
ile la pauiiilhL A contmuficn^n tram 
ii n a Einea li^LStn d punfo situ ado 125 


pixels a la derccha y 50 pixels hufia 
arrihii. cotltitrtdu jix.Se el fondo de la 
pant alia y «tkibla[tdu» la lineu — E a 5 
radiancs a medida que la va ira7.an.do. 

A parlir dc cslc panto, son las va¬ 
riables las que dnminasi. Is variable Jt 
inicia eada linen un pixel mis a la dc- 
rccha y 3a variable j liace que tad a li¬ 
nen Mia un pixel mds tore a Ljue la alt- 
ternsr fen caw contrario se saldrij. de 
la paniiilla), mienLras que la variable 
z haec que eatfa linca termme un pixel 
mas aba jo que Ja anterior. 

EvidenlcmcnEe, llegara un mo¬ 
menta cn que : llcgari a ser un mi* 
mere neciitivo. hacienda i|lll j el ordc 
nadnr interne (nin consegwirft}) impri- 
mir algo por dcbqju del ftmdu de 111 
pan)alia. Dc aqui In necesidad dc la li¬ 
nen 150 . que hacc que lodas Ira Jinera 
curias prbximas a I Final del programs 
terminen en la tinea dc f«ndn dc hi 
partial la. 


AW BOLES Y ARBUSTOS 

El programa de la parbda lEc gLdf 
uiih/.i nunbsdn circuits enmpleim. 
ctutio susiitutivos dc III senienciu 
PAINT y oiras riLniili^ l'-.l 1 *. que Figuran 
en ct ropertn rin tic iftrm ordenadorcs 
pere no cn cl del Spectrum. Los efr- 
culos sc cmplcan para productr urho- 
les y matojos L.iis siguicntcji Ifncas te 
pcrmitir4ii tener unos cuantos arbus- 
lOi aIciiLoriamente disliihuidnv deltas 
del 


400 FOR fi = 172 TO 163 STEP- 1 
410 LET X=RND T 45+195 
415 PLOT X.R-2: DRAW 0.-2 
420 CIRCLE X,R,RND*2+1 
440 CIRCLE X + 10,R P RND*2+ 1 
450 NEXTfi 

hn. cambin t>Tra(i llneas ha ran quo 
aparezea una mnLcza anAlsiga cn el 
ludu dereeho: 

450 FOR R=135 TO 172 STEP 6 
470 LET Y=252 
460 CIRCLE Y.R.RND+2 
490 NEXT R 

Los .Ubolcs de La esquina inferior w- 
qiiierda son dcm-issado ernndcs psira 
sc r tl i bu jados eh Icatortn mcnl c, t ? or c» 
on este case hemos itlilizado una lee- 
men distintB, cmplcarudo las sente ncias 
READ . DATA! 

900 FOR W=1 TO 3 
910 READ A.B 
920 PLOT A,B 
930 DRAYi 1 ' 0 t —24 
940 LET R=RND*5+5 
950 CIRCLE A-lp.B+F.Fi 
CIRCLE A.B+F.F: CIRCLE 
A+ 10.6 + F.F 

960 CIRCLE A-5,B + F'2,F; 

CIRCLE A+5,e+F*2 t F 
970 CIRCLE A,B+F*3,F 
980 NEXT W 

3000 DATA 20,70,52,35,34,100 


ZB INPUT 



























HI irucp cpnji-itc cn dibujar primcro 
Icjs iron cos. jwnnzando hacta abajo j 
pLirlir dc ln<s puntOJ 01 igiliate* Je III 
Wdicnizia PLOT, dc forma que no 
mamas iziegas de ir uncus :.i 
ifflves Jl- I «foJJajc»' Ll dtbujn dc los 
tinmens sc hacc por medio dc 20 T iL 
cic r . ademas dc la lines dc DATA 
3000 I 3 lincLH '■Mu ■sine pufu oleato- 
rizor cl Tam aim del folJajc, micnlm* 
(|UC cl B + F qlie fagUra eat la Ifrtca Y5(J 
sine pflru ascjturarse de que las Tins 
del fondo de lus circuit k cmpiczan a 


U3ia dtslaneuL ^nlccu.-icin por cneirna dc 
los IroisLos. 


LOS TOQUES FINALES 

La -ice- de lanzairHertin sc dibuja 
pur mcdki dc I its sijsnjcntes Linens: 

1000 LET T = 30 
1010 FOR Y= 0 TO 10 
1020 PLOTT.Y 
1030 DRAW -30,30 
1040 LET T=Tt2 


1050 NEXT Y 

V cslas oLras linear lirsen para di¬ 
bit jar las banderas err Ins verdcs: 

170 PLOT 220.140 

180 DRAW 0,15: DRAWS-3: 

DRAW -8,-2 
190 PLOT 22,120 
195 DRAW 0. IS: DRAW 9.-3: 
DRAW - 9.-2 

Por uttinwi necesilaras algunus ■ l>urv- 
keniJ' u hoyos de arena. Cuando no sc 























dispone dc ima scnteneia PAIN ]', b 
rosncra rnAs inmcdiala dc dibaijarlnv 
aunque m,uy knta. cs c mpczu r cur 
urv.i pcqucriu cl ipse y huccr cjuc vayu 
crccie ndo pi sc I is pi's cl haiHlis que al- 
CaiKc un l.iiiiiiilo raziumtde. 

Lu farm:! tie dibuj&r clipses se et 
plienra cn dciallc cn un nrticulo pos¬ 
terior quo dcdkarcmre 3 Us funcicincu 
mate m Sires? Micntnu Ltnio, puedc* 
intrvducir las sigulentes tineas, 
Cuandc* las. cjcculcs puede? irtc tran¬ 
quil iuncnlc it lomar un cafe para dark 
liefflpo a l)uc ucabe: 

1495 LET K = 1 

1500 FOR X 0 TO 2 4 PI STEP PI/ 
1S0 

1510 PLOT INK 6:168 + R 4 S!N 
XJ47+R*C0S X/2.5 
1520 PLOT INK 6;235+R*S!N 
X.106+R-COS X/2.75 
1530 PLOT INK G;225-i-Ft*SIN 
X,97+’R*COS JU2..& 

1540 NEXT X 
1550 LET R = R+-2 
1560 IF R>20 THEN GO TO 
6000 

1570 GOTO 1500 

Tatnbkn tienes otra allefitalivii mis 
raptda s solid Lla, iiullquc los Jibufus 
[OSiUllamts sotv i»As basics. Consisie 
cn li ti I iear c us GI >Us, para enn si niir to? 
bunkers. 
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DOMINANDO 
EL TABLERO (I) 


Sf levjintR cl ti'lciii piiri) tu prchcnla- 
cion del Juego OTELO* Proprama tsti 
vifr-fUci jd-L’KM de esti-uteght > de I'nn-nio 
j desatfu a lu ordeiwdur, Pm, ;eni- 
duduL FUJM l,in senrfllocuniijpiirece. 

OTELO cs un juego dc escrategiu 
que se jucg,i sobre un lablero de ochu 
par echo casillas —un table ro dr uje- 
drez n de thunu?, puede Hcmrnns—. 
Las icglas soil EiSUy simples y d juegn 
eucnla eon vaiins trucos tambkn. 

LI objetivo cunslste qn uapturar o 
tamer cl mayor numcm de fkhits po- 
sihlc* n nt oporvcnic Coda jugador ha 
dr coliKnr urm fichu cn cl liiblero 
hasEu Hu narks por completO AI CO- 

mensur cada uno cuentu con dos rich as 
v b.t de internal eapturar Ins del |u- 
gfl dor lisnl f.i rio mde&ndn s elm Li I n se 
login colocando ana ficba exlra a I final 
dc linn rila dc firtnas, de mancrj quq 
cl adversaria) se vea acoiraliulo por ills 
fichus. 

rodas las fichus adversnrias que ha- 
yas seorralado scran reemplazadBS 
a bora pot fichus my ns. 

El numejo de pLntlos sera simplc- 
mcriEc d numern dc fichas de Lada ftt- 
gadur que hay a suhre cl lablqro du¬ 
rante cada jugnifLi LI EanUdOr serfi 
uqud que consign tener el mayor nfi- 
mcro dc piczas sobre cl lablcro 
euundo este esti; Ik no. 

Eft esta version, til juegns coni ra d 
ordetudur. d cual lambiCji cnuesLra cu 
pamaELu d tublcro y JJcvii lu purilua- 
cidn. 


COMSEJOS Y TRUCOS 

Al igual que en cvalquicr fltro jucgn 
de UHlratqgia, esLe Uimbiirt CuCrtta con 
uJgunus [mem que pueden serle de 
gran ayud-a, 

Si csta cs lu prinvero vez que juegas 
;il OTELO. Ids siguicnlcs conscjos ic 
senin muy utiles 

Las fichus de los ertremos son inuy 


valtosas. pues no pueden scr recupe- 
rad as una vez han sido eaptu rad as I a 
ru/.6n dc dlo debido y l|uc; esias fb 
chas no puedeu ser aeorraiadas como 
las lIl 1 turus ptssiciones dd lablcro- 
Como conwcuencia, pueden scr muy 
sianificaEls'zis para ganar P y es muy im¬ 
port ante cnpturur laiesquinas, ms I u so 
siicrifiL'antlo un movimknto que po- 
dria habemof, proportion ado una ma¬ 
yor pnmuacidn. Asimismo, [ambk 4 n 
son intocabLcs cuda unu dc lus fichas 
emplaiadas junto .1 ];is ficluts dc lases- 
quiftiSr 

Pucsto que una picza puede cnlazar 
miis dc una Ifncu —nrriba, ahajo yen 
diagonal—, el mwimicnlo mus obdo 
no siempre sent cl mejor, micnEras 
L(UU ceI las ultimas Eases del juego, a 
munudn lu pucdcs cnlawsr don o ires 
linens anadiendo urns sola fidia. 

Debes pt iisLir siempre con .unici- 
pieidn j. 2 adversurio. Tal sez puediis 
conscguir enganar a tu oponente 
cfcando situaciones favonihlrs pura ti 
—para eonquislar pOtaacioncs vj|u]c$— 


■ 

CQNSEJOS Y TRUCOS 

■ 

LA PRIM ERA PAHTALLA 

■ 

DEFINE?NDO EL TA6LEHQ 

Y LAS PIEZAS 

■ 

EL JUEGO EM MOVlMIEMTD 


sirnulando ana mala movidzi dc tus fl- 

chas. 


EL PROG RAMA 

LI progninu juugii d ptipcl dc lu 
OpOnente —con fichus negras—, y va 
veriis ednto un pr-u^raina, comparap- 

vismeme seudilo. cs capaz dc jtigar 
con mucha desireza cl desafiantc 
juego OTELO. Una de tas lira rides 
ventajas que present cl program? de 
ordenador OTELO, cn comparacidn a 
un juego normal de tablero, cs que eii 
La vcisitki de ordenudor te a horns 
EOda In pane dd Irabajo difiril. El or¬ 
denador te evil a el icnci quu eolitar 
las fichas o snsliiuirbspLir oiras de di- 
fere me color Tu unico trabajo con- 
slsle en concenttane en el juego. 

Puesio que el ordenador coitsideru 
lodas la\ pwihilidadcs, tarda un poen 
cn reafizar sus mtn'imLqntns Ju fkbas. 
aunque se vuclvc mas vcloz a medida 
que avanza el juego y quedan eadu vcz 
me nos casillus vactas. 



INPUT duegos 73 























40 LET CP=1e IF X$="N" OR 
X$= ,r r’ THEN LET CP=2 
100 DIM B(8,S>: DIM CfS): DIM 
Difi.2): DIM XC60); DIM 
V(60): DIM N(60) 

110 LET 0(4.41 = 1; LET B(4, 
5}=2, LET B{5,4)=2: LET 
815,53=1 

120 FOR F = L TO fl: READ A; 

LET D(F, 1)=A; READ A; LET 
D(F,2}- A: NEXT F 
130 DATA -1.-1.0.-1.1,-1, 

140 FOR F-0TO 7: READ A,B, 

C: POKE U3R 'TT+F.A: 
POKE USR ,, B"+F,B: POKE 
USR M C" + F r C: NEXT F 
150 DATA 204,0.0,51,60* 50, 
204.126,66,51,126,66, 
204,126,66,51,126.65. 
204.60,60,51.0,0 

Las lincus 10 a 40 se encargan 4c la 
prime™pnntalta que vcc! jugador, La 
tinea If) detenuiiia Los colorcs y borra 
la pantalla. F-L tituludcl inc^o seedita 
con la linea 15. La Jtn-cw 20 edlta 
(PRINT) un smibolo indiendor de 
Jisto, v le pregmi ta si descas comenzar 
iu primero, La rcspvctfu se registraen 
X5. Soguidamcntc, en la Imea 30, XS 
queda reducida a su prime ra letra. CP 
eh d jugudor actual v tnma cl valor I 
para cl kumatto, y et valor 2 pan el 
ordenndor l^i linea 4(1 verificn la res- 
pucsta o *N>*. 

Las I Incas 100 a 330 iiikiulizan las 
vartabLcs y los veLiores necesarios on 
d juego. Lj, bnca ]i)n sc encarga de Ids 
vedorcSr B(s,yl nepreseitu cl lablcro 
y los salorcs rcgisl redos en cada ele- 
mento represent an d cstado de laoo- 


rresperndteme Camilla del tablero si 
llei elemenlo es ccro. la casiUa esta va- 
da. si es UJIO. es quc esta wrupada por 
unj fichu pertcneciente al jugadur.. y 
si el valor cs dos, la casilla csti uty- 
pada ptir una fkha del ordenndor, 
C(?d se usa para comprobar el movi- 
miento del jucaddr, D(*,y) connene 
Ids despiazamientps X e ¥ para las 
ocho posibics di rccdoaes de movi- 
miento. Xu). Yfa) y N(*) sc utilizan 
para caloilar cl inovimicnto del urde- 
nador. 

La Ifnea I HI determine l^s posicuv 
ncs inidales so-bre el tablero. Cada ju- 
gador tienc enlocadas dos fichus cn el 
ccntro del table ru. Las posibles direc- 
eitmes de esiu posicibn sc Eccn 
(READ) de las I in can DATA cn la lb 
neu 13d, Cadu mi mem represent* un 
desplazamk'nto X 0 Y. Stendo l<rs tiu- 
meros ncgatlvo* movimienlos hacia la 
i/qUierda o hacia la parlc superior del 
table ro. Las lliwas 140 y 15^1 c<>|t>eurt 
Ion l'D(i pata las casilFas vaeias y Ins 
tins difereniev fichas. La ll'nea I JO lec 
Los dntos (DA FA) de la ILnea 150 y co- 
[oca Ins UDG A, ByC. 


JUG AW DO AL OTELO 


Curnidn cjCciites el programa, cl nr- 
denaibr te preeumaru si dcscas nv^ver 
tu pnme™. Cada see que hi'igas un 
movimiento tendtas que intriiducir 
dos coardenadas, £stas indicariin tu 
posicidn dentro dc urm cscals enlrc 
Lmo y ochu —tus ndmeros de I iney 
dc columnas Se ednan de arribu abajo 
a un l»dci del tahlero Lascoordenadas 
sc introducen indicando primero la 
posicidn horizontal (Ifnca) s luego In 
vencal (columna) 

til programa no rcconocc a un com¬ 
pel liem de juegO poco liAbil, ni t;im- 
pocsi es capnz de adivinnr si e?siris abu- 
rrido. as( pues, Lniroduciendu un d 
como cwrdcrvada, ^ Jli Tm a I juego. 


PROLOGO _ 

A continuucitin, iedea La prime™ 
section del juego OTHLO. Si ejccutas 
cun RUN d programs en estu fast, ee- 
Ms Ja primera panpllu y los (dlicos, 
pero no podrtis jugar tudavia. No Di¬ 
vides grabat jSAVE) cl procrjtma, dc 
m-anera que puedas aAadirle luego Ln 
.segunda scctidn- 

10 BORDER 0: PAPER 7; INK li 
CLS 

15 PRINT AT 1,11; INVERSE 1; 
"0TEL0' f 

20 PRINT AT 10,0; OUlERES 
EMPEZAR TU ('S' 0 < N')?"i 
INPUT X¥= IF X%= trlt THEN 
GO TO 20 

30 LET X$=X$(1): IF XS<> J| S'‘ 
AND X¥<>"N" AND 
X$o H s" AND XS<>"n IN 
THEN GO TO 20 


T 4 INPUT Jtiegos 










S EG UNDO ACTO; TRAZANDO 
TAfiLERQ 


1000 CLS t PRINT TAB 11: 

''1Z345676- H : LET P5=0: 
LET CS=0 

1010 FOR F=1 TO 3: PRINT TA 
9:h 1 ' FOR 0=1 TO 0 
1020 IF B{F,G)=0 THEN PRINT 
CHRt 144 ; 

1030 IF B(F„G)-l THEN PRINT 
INK 2;CHR$ 145:: LET 
PS=PS+1 

1040 FF B(F„G) = 2 THEN PRINT 
INK 2;CHR$ 146;; LET 
CS=CS+1 


1050 NEXT G: PRINT ; NEXT F 
1052 LET F$-' , PUNTQS i ': IF 
PS^l THEN LET 
P| = M PUNTO‘ h 

1054 LET Q$= r PUNTOS": IF 
CS=L THEN LET 
Q$= ,r PUNTO" 

1060 PRINT " INK 2; 

’JUGADOR=' h ;TAB 22; 
"GRDENADOR = ri : PRINT 
PS; 11 ";P$;TAB 22:CS; ,F " r ; 
Q£ 

1070 RETURN 

lil I sib lent lo Uibuja la nnma que sc 
inLcia a pnrlir dc In linen HU*]. La pan¬ 
ts) I In se bona, st cdit&n los nt'imcros 
de las columnar, * tos maieadoies se 
cdocan a eerfl, 

tl buclc FOR...NEXT cnire las IF 
neas 101 L y 1050 edilu cl tablemen lu 
panialla, I Inca a Initsi. A medida L|uf 
St van mDSlraililu i.si pit 111 - ■ 11 ;i liis li- 
chas, se van incrcmcmandu Ids pumas 


PRIMER ACTO: EL BUGLE 
PRINCIPAL 


500 GO SUB 1000 

505 IF CS+PS=G4 THEN GO TO 
4000 

510 LET EG=0: fF CP-1 THEN 
GO SUB 2000= GO SUB 
1000; IF EG = 1 THEN GO 
TO 4000 

515 IF CS + PS=64 THEN GO TO 

4000 

520 IF CP=2 THEN GO SUB 
3000 

530 GO TO 500 


El hiBelp principal del prrnpania se 
ejeeula desde ki linea 5(X> a lu 11nest 
530. La linea 500 llama a la subiulina 
que trnza el tab loro Las lint ns 505 y 
<15 verifican si el l&blero e$lA lit nit. 
Lo realign comprobandD si OS (pun- 
Uiaeidn del ordenadorl y 1*5 ipuniua- 
eirtn del humano) sum an M. 

La linea 510 coloca a ccro cl flag d™ 
Jin dp jucgn (EG), La seeciiin medi 
dc In linen llama a la subrutina turn 
para ef fttgador, scljuiJs) dc In rutin 
mostrar taMero. 5i, una vea Cjccutadci 
cstas tubful inns. ha sido adoc-uln EfJ 
d programs salia a J;i nitina fin tk 
futgp. eomensEundo en lu linea -HHh 
E l nurvunicnto del ordenador es lie 
v«drt a cabo por la litleu 520 si C 
cs 2. 


en el marcador. Las linens 1052 y 1054 
van Dunmndo los puntos edi cades 
(PRINT ) cn la lines 1060. 


TERCER ACTO: EL MOVIMIEWTQ 
DEL JUGADOR 


2000 PRINT AT l4,0;' f CUAL E5 
TU MOVIMIENTQ [FIL, 
COLI?"'; INPUT X P ¥ 

2005 IF X=0 THEN LET EG - 1: 
RETURN 

2006 IF X=9 THEN LET CP-2: 
RETURN 

2010 IF X<1 OR X>3 OR ¥<1 
OR V>B THEN GO TO 
2000 

2020 IF B(X,Y)^0 THEN GO TO 
2070 

2040 PRINT AT I7,0fMQ 

PUEDES MOVER A UNA 
CASILLA YA OCUPADA"; 
FOR F= 1 TO 500: NEXT f 


INPUT Jueqas 75 


















compruebs &i X es. igual a ccro, y cui- 
lut:;i cl titty, liC. 

I ,:i cniniJ;L lL j I jujgfldar st veriFica 
coma eminea en hi lineu 21)10 y< un 
t lists necesiirio, rcliacedc satiunJo □ h 
Linea 2000. 

|.:i amjlla ele^Ldu i.s someiidu n vc- 
fifk’flfion ton el fin Jc eomprobar si 
cstii \ acin, y m a si es, cl programa ^ii I tn 
a E;i Ifnea 

Sl In cii'iillu ya tsia ucupuda; l.i linen 
2060 ediia un mcnsaje de error 

El: ulitmo pur tie Hneat —2060 y 
2070 — tic csu scocidn del programs 
comprucbu si lit nueva licttu ha ritlo 
cokucadu L-crtu de urta fichil tWl nrde- 
rtftdor 


20GO PRINT AT 17,0:'' 

GO TO 2000 

2070 LET NF=0: FOR F-l TO 
8; LET CF=*0! IF X + D(F« 
ll=0ORX+D(F.l)=9 
THEN GOTO 2075 


2071 IF r+D{F,2)=0 OR /+ 
D(F.2)=9 THEN GO TC 
2075 

2072 1FB(X + D(F<1J.Y+D(F, 
2))=2 THEN LET CF=1: 
LET NF= 1 

2075 LET C(F)=0i IF CF=1 
THEN LET CCF3-F 
2080 NEXT F 
2090 STOP 


LI muv i n lie nCtt iIl'I jusjadur fie inlJPO- 
Jul'c en las: linens 3000 .l 3170, peru en 
efilc tahHi. y| prtjgruma sdk? IIc^li has l.i 
la I i ntis 204(1 

DesputSs tie un simbolo indicador. 
las coofdenadas (Xt Y) son ml nod u- 
cridas cn 3a linca 2000. l.a ]inca 2005 




DOMINANDO 
EL TABLERO (y II) 


■ 

SEGUNOA PARTED! OTELQ 

■ 

COMPLETANDO EL TURNO 


DEL JUGADOR 

■ 

ELORDENADOR MUEVE 

B 

ANUNCIAHDOELGANADDR 



Desputs df uii brtve deseanso, pase- 
mo* a (jTC'finbr d fludu v ttcsenlice Fi¬ 
nal dcOTELO. 

A conllnuadon, vartiusacfeetuar ai- 
giniuK nunimlmtcN usLulus. 

i'uando hayas c&mptctado cs-tn &C' 
j?_umla parCc del jue^o QTELO ten¬ 
drils ®n.ie li «xk> cl program* para po¬ 
ne r a prucha tu ingcnio, He nquf las 
Line os. necesaries para complctar cl 
lumu del jugudeir, junto con [a roliiia 
de movinuento del ordertador y el fi¬ 
nal de La rutina de uicgn, 


DESPUES DEL DESCANSQ 


2090 IF NF= 1 THEN GOTO 

2120 

2100 PRINT AT 17 i 0 i , 'TU 

MOViMLENTO NO StGUE A 
UNA DE MIS FIONAS"; 
FOR F= 1 TO 500; NEXT F 

2110 PRINT AT 17 r 0; if ,p t 
GO TO 2000 

2120 LET RF = 0; FOR Q=1 TO 
8: IF C(Q)-0 THEN GOTO 
2170 

2130 LET XP=Xt LET ¥P=V 

2140 LET XP=XP+D[Q,lh LET 
VP=yP+D(Q,2): IF XP=0 
OR XP-9 OR YP-0 OR 
YP-9 THEN LET C(Q)=0: 
GOTO 2170 

2145 IF B(XP,YP)=2 THEN GO 
TO 2140 

2150 IF BdtP.VP)=l THEN LET 
RF= li GOTO 2170 

2160 IF B(XP r YP)=0 THEN LET 
CtQ)=0 

2170 NEXT Q 

2180 IF RF = 1 THEN GO TO 
2210 

2190 PRINT AT 17„0; M TU 
MOVIMLENTG NO 
FLANQUEA UNA FlLA": 


FOR F=1 TO 500: NEXT F 
2200 PRINT AT 17,0;'' "s 
GO TO 2000 

2210 FOR a= 1 TO 8: IF 0(03=0 
THEN GO TO 2250 
2220 LET XP=X + D(Q, 1): LET 
YP=V + 0[0,2i 

2230 IF B(XP,YP}=1 THEN GO 
TO 2250 

2240 LETB{XP,YP)-1: LET 
XP=XP+Dt(U): LET 
VP-¥P + D(Q,2); GO TO 
2230 

2250 NEXT Q 
2260 LET B(X,n= 1 
2270 LET CP = 2: RETURN 

I ji linen 2090 ctunproeha c I flag NF, 
para verifiear antes. de sahar a Ll line® 
2Y2iK sj hav una ficha pertcnccienle ai 
ardenadoren unacaatlla adyacentc. Si 
no hay ni ng nria ficha, la linca 2100 
edim un mensaje de error. 

A conrinuacidn, cl program* com- 
prucha en las line®* 2130 a 2170 sj el 

sj](ivt::iicnjLJ dcrrn lliili linca O til® del 
lablcrOr t-a linen 1 14(1 asegura que Jil 
pad cion l|uc ha sidu coiupiuliadd ert- 


|ra deni rode Loh Ifrmtes del laMerO. Ss 
no es osl, s-e abandons c&ta direction 
y sc prueba con la siguicnlc, I .a linca 
2145 ase^uru que la fichu comprobada 
perieneeL- al ordenudor. Si eh aiu. el 
program® retrocede u la Ifhea 2140 
para actwylfear la position. 

Fn In line a 2LfX) sc verifies cl ^xitu 
de La ultima operacidn. Si sc ha m- 
contrado una Hip, el programs sally n 
Li linen 2210. Las l/neas 2190 a 220U 
cel n un un mensaje para eumunicar a] 
jugador que no ha side ccrrada Lina li¬ 
nes. v el progruma retrocede o la tinea 
2000 , 

El movimientn cn si sc cfectuu en 
las linear 2210 a 2m El bude Je la 
linen 22lil comprucba si sc tin locali- 
zado una fila adecuada, vcrificando 
C(O). Si no hay nin^uriii fila en Cia di- 
rccckjn, el pragraiua h^tia al tiuuieme 
NEXT G en la tinea 3250 XPc ¥E> 

eotocan en hi primera casillu dc la filii 
tomada —ver lirca 3040, 

En la Lmea 223(1, el ordenador vc- 
rifiLu el final de una linca. Si sc cn- 
cuentra un final de linca, el program® 
salta a La linca 2230. La lines 2240 w- 
Lixui) la cum lla a uno, lucgc salt* u h 
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tinea 22fr) para oomproEar la siguicntc 
amltft. 

En La linea 22W. la casdUo del ju- 
pador sc wkica u ueiu. El flag CT se 
caloca a dos para d oidcnador en la 
tfnea 2270 v el programs haoe un RE 
TURN'. 


EL MOVIMIENTO DEL 
ORDENADOH 


3000 PRINT ,ir, PENSAN00... ,, ; 
LET NF=1: LET MX^0: 

FOR X=1 TO 8: FOR Y= 1 
TO 8 

3010 IF B{X,Y)<>0 THEN GO TO 
307# 

302# FOR F =a i TO 8- LET XP-X: 
LET YP-Y; LET DX^DiF, 


1): LET DY=D(F,2h LET 
RF=0 

3030 LET XP=XP-fDY ; LET 

YP—YP+DX; IF XP=0 OR 
XP=9 OR YP=0 OR YP=9 
THEN GO TO 3060 

3040 IF BfXFJPHl THEN LET 
R F = 1 ■ GO TO 3030 

3050 IF B*XF.YF)=2 AND RF= 1 
THEN LET N(NF)=F : LET 
X{NF>X f LET Y(NF)=Y: 
LET NF=NF+1: LET F=9 

3060 NEXT F 

3070 NEXT Y: NEXT X: LET 
NF=NF-1 

3075 IF NF=0 THEN GOTO 
3300 

30B0 FOR F= 1 TO NF ; LET 

X=X.(F): LET Y=*Y(F); LET 


DX«D(N{FU>: LET 
DY = D(N(F),2): LET CF-0 

3090 LET X=X+OY: LET 
Y=Y+DXi IF BLX,Y)=1 
THEN LET CF~CF+1: GO 
TO 3090 

3100 IF CF>MX THEN LET 
MX=CF: LET MF=F 

3110 NEXT F 

3130 FOR F-l TO 8: LET 

X=X(NIF): LET Y=Y(MF3: 
LET DX=D(F.1J: LET 
DY = D(F,2) 

3190 LET X=X+DY^ LET 
Y^Y+DX 

3195 IF X<1 OB X>8 OR Y<I 
OR Y>£ THEN GO TO 
3260 

3200 IF B(X,Y)- l THEN GO TO 


7& INPUT Juego* 












































3190 

3210 IF B(X,Y)=2 THEN GO TO 
3230 

3220 IF BfX p Y}-0 THEN GO TO 
3260 

3230 LET X-X(MF): LET 
Y-Y(MF) 

3235 LET BfX r Y)-Z: LET 

X=X+DY : LET Y=Y+0X 
3240 IF BIX,Y}=2 THEN GOTO 
3260 


MOVIMlENTO": FOR F=1 
TO 500: NEXT F 
3305 PRINT AT 17,0:: M 
3310 LET CP=1 
3320 RETURN 

£1 numerodc casillas dc una fila sc 
cc]|tK;ji a mho. y el numero mitoimo de 
Itch as encontrado cn una flla es colo- 
cm do a cero eri la line a 3000. Sc eje- 
cuian dos bueles —eon las variables de 
com ml X e Y tsios jecorrcn el ia- 


Lu linea 3iUOcomprueba si EacasitEa 
cstft vacia. .Si no es asi. el ordenador 
salts a U siguiente semenda NEXT cn 
la linea .WTO, Las Hneas 3030 a 3Wdi 
aimpmcbun si Is easilla eslS a I Final dc 
una REa que el ordenadnr pudicra tn- 
mar XP e YPsc ulilizarv igual cjne an- 
Ics, DX y DY repress man el corue- 
Eudci dc la direccibn dc campo D() y 
Eicnen una reserva basianle grande de 
espacio. 

La Silica 30341 etn tipf Ucba si la Ciisllk 



3250 GO TO 3235 
3260 NEXT F 

3265 PRINT XTMFLYfMF): INPUT 
A$ 

3270 LET CP = 1: RETURN 
3300 PRINT AT 17.0;"NO 
PUEDO REALIZAR Ml 


blero a la biisrjucda y captura tie es- 
pacins, libres. F.sia es la section del 
programs que mis liempo consume. 
A rncdich que cl numero dc casillas 
varies disminuye con cl avanec del 
juego, i mm bleu disminuye cl tiempo 
qua el ordenador emplea para realiznr 
siis movimicnioH. 


a vcrificar se eric centra en el (ableta. 
Si no es as£, sc ramprueba la pibsima 
dirccdbn, Si la casilla comprobada es 
una Camilla pcrtcnccicnte uI jugador. la 
rutina rclrocede enfonces a la tinea 
3030 paracomprobai si la siguiente ca- 
silla cm a ocupada por el ju^ador. 

Hn la linea 305b sc comprucha cl la- 
blero para ver ri o*[a ocupadc pot el 
ordenador, Si cs. .-isi. y sc cncacnlra 
Linn fila, -sc registrar! I as posidones dc 
Lnickj cn Xc i c YOi y los numcros de 
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direcritin se graban cn NO- Fambten 
vl; mcn-mcma el marcher que i niiiL-a 
d minify de coordenadas cncomra- 
das, 

Sti 1%i se iituba Ju primers filst. a fin 
dc a-scgurar tjuc la busqucda requiem 
el mcnor Tiempo posiblii. 

Las Nneas 3080 a 31 It) Hallun cu^3 es 
el mavimicnlo que dn Lj mayor pun- 
luacidn en linen recta. Se acliva un bu* 
de de urto u NH (numero tie e?sill&s 
cnconuadai). Xe Y se cqmparan a 
Xff ) y a V(FJ. Laicqordenadasde di- 
rcecifin. DX y DY, son oolocadas cn 
las dirccciones indicaiJas en Ni. F r > CF. 
a e-Htla cjeeuddn del bade se colwi) a 
cera un marcadur temporal. 

La linea 3090 se compcfecbn para 

vcr si las fichus veriFicadas pcrtenecen 
al juesdor. Si cs H5L, se increrncmaCF 

80 INPUT Juegos 


v sc comprucha la si ju rente easilla eu 
esla dircccfon- La Hnea 3100 eons* 
pmeba si el numcro cncontradu iCF) 
cs mayor que cl tttinnifi anterior 
(MX). En caso afirmarivn, MX se eo- 
lota i£uul ii CF, y ME ifiual a Ins clmjt- 
dcnsdu ile |a mejar fie ha coLocada en 
ct ImJiee F del bucle. 

[ n rul inn de mnvimienio se ejeeu-Sti 
en l as lineas 31 BO a 32bO. La linea 3 180 
ejccuia un buclc de uno a ocha ELIl) 
se realism de tal modo quc se puedan 
eneorlmr El as c-H toda* ilarceeinnes. 

X. Y, DX y DY 5 C enlucan cornu 
jtiues, y en la linen 3193 se eumpruie- 
ban X c Y puna vcrdiear quc aim. si- 
guen en eL tablero. St no cs asi, c! pro¬ 
grams seiIm al NEXT en la Line a 32m 3, 
La Linen 3200 compruebj si el ju- 
gador ocupa csta cssilla. En easn afir- 


rnauva, La nalina salta para intemiar la 
sijaireme casilla do csta filu, En eslc 
puino ninguiia tasilln sufre olterocid-n, 
pues la ruiina \6lo estfi probandn. 

Si Lu Eb ncaba corn una cusilla ocll- 
pada por el ordenador. se rcslan X e 
Y y Las Linens 3225 a 3250 altcntn todas 
las easillas tie la Ilia. Si se eneaentra 
umi Lasilla vuel'a, se prueba con Li si- 
gmente direccidn 

Una vc/ que la runnn ha dccidido la 
Camilla Hi la que deM;ii mitverse , 3a LIlKU 
3265 edita las counienadas y espera a 
que se pulse la iccEii ENTER La linen 
>27(f colocn cl flog CP a uno paot el 
turno del jugjdor, regresaedo se.y;i]i- 
damcrue ;il huele principal. 


EL FINAL DEL JUEGO 


IF PS>CS THEM GO TO 
50fl0 

IF PS=CS THEN GO TO 
6000 

PRINT AT 17,0i INK 2; 
'TUE FAC1L! M 
PRINT "QUIERES JUGAfi 
OTRA VEZ('3TN , )? W 
4040 LET AI-INKEY$ ; IF 

A|o"S M AND AS<> h N'' 
THEN GO TO 4040 
4050 IF &% = "$" THEN RUN 
40G0 STOP 

5000 PRINT AT 17,0; INK 2; 

"TUVJSTE SUERTE! rl 
5010 GO TO 4030 
6000 PRINT AT 17.0; INK 2; 
"EMPATAMOS, NECESiTO 
MAS PRACTICAL GO TO 
4030 

El Final de la rutinu del juegti sc Nu¬ 
lla a partir de In linca 44X)0 cn adc- 
lame, I.a propin llnen 4(lOUcornpre-cbn 
si el iugadJtr hu ganadi) eumpurLindu 
PS v CS. EL prograrua salla a hi linen 
5000 para eJtiar cl mensaje tie quien 
ci el ganaddr. La ifnea 4010 com- 
prueha un dibujo \ Li ruTnlS del men- 
saje se encueriLris cn Li JiNeu 60,lt J Si 
cl ordenador hu venddo. d prognutm 
llcga :l la linen 40 l 20 y edita un mensaje 
para jcchar uiin mas sal en la herida! 

Las linens siguicnles sun simple- 
mente u,n^ upddn de (,otij partid,a? 
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MANEJANDO LOS 
NUMEROS ROMANOS 


u 

REGLAS DE LOS NUMEROS 

ROMANOS 

■ 

MAMEJ0 DEL PR0GRAMA 

■ 

CQMFNTARIOS AL LIST ADD 

DEL PROGRAMS 


es Inn Fad I irotatjui' con tos nu- 
mrrcs inniaim. Lounko hsictf falla 
ck conocer I:ls reglaa qu e lo$ rlgHi.Te hi' 
t iLmrw a cnsemir n ademfa t« grrwMIW 
un programs para true lediviertas con 
dlus. 

Los romanos sc distmgukron cn 
muchos compos oomo pudiera ser el 
Dcreeho, Li organizacidn milirar o las 
grandes obras publicas, pera en cl 
campo de la Matcmalica rcalmcntc no 
Jeslncaran, Enirc otras t ozones, quL 
zis Lina sea su sSstemn Jo numeration. 
Lus, riunicn.iv rOnliiODS Min uiuy vum< 
pttcados de mane jar n la hum dc haccr 
operaciones con ellos e induso resuU 
tan muy engurrosos simplcmenlc UTi- 
liznrios como tal Hay que reconnccr 
que Eos fi rubes les «mojaron la oreja* 
sin 11 inuun jkneroije dudu. Results de 
una cEarkEid meridinna que 3. L >3J 
es mucho mis mane j able quo 
MMMCMXXXm y que result* mas 
imuiiivo d mnnejo dc multiples dc 10, 
por ejcmplo 3-5<Kl. 35(J, 35 que sus 
cquivatcJStes rnmunns MMM D, 
CCCL, XXXV, 

A pesjr dc lodn, tie |o que nn ptt- 
ttemoscfsrcne garde uno de Ins pi I arcs 
bisicos tie nuesira civilizaetdn y. nos 
tjliste n nn. lei cierto e* que cun ciarto. 
Free u end a ucccsi tamos leer mi mere* 
romanos l' pnr ejcmplo para referimm 
a tech Lis) n induso espresar on nn- 
mero en cifras romanas Con as uJa de 
esie program* ya ns> neeesitaremos sir- 
d.tr tirtLQ reeorJiilldo uquclluv que 
aprrndimos cn el colegitj luscc un 
montdn Je aiios o pasur una fieri a ver- 
gucruu pregun lands i m cn que ms cn- 
coiUrantns un lifaro a maim pant rc- 
frprar nucitrus eaimtimientus. 

Las regia* para e&qrihir mn nume- 
ros romanos son algo laboriosas, nun- 
que file lies dc enlcnder: 

— l.ns numeius bisieus se cspresitn 

median! e lat sr^uienles lelrav E V. 


X. I.., C. D. M que pquiwilen res¬ 
pect! vgmcnlc a 1. 5. JU. 50, MHi. 
500 y IWOr 

— Cualquicre tie «os sfmbolos mol- 
rip lien vu valor por 1,000 a por 
[.000.000 si sc lc supcqponc " 

i> " = = " icspcciivamenic. No ol- 
videmCS que para | ,000, 2,001) v 
TEMItJ e m sie M. MM y MMM y que 
cslos mismos simbolos con un 
cuiori endma equtvalen a unu, Jns 
v Ire* mi None s 

LOv Sim bolus n|p t "Xu, -1 »* y VI •• 
solo puetlcn jepetirse un masiiino 
ite irev vetes consecirtivas s ct resto 
M.'iltj una. 

— Un simliolo a la ijrquierdii dc otro 
lc res! a mi valor a fate {umi sola 
vcz). 

Solamerue se puede anleporcr un 
simhoLi cuandn no put'da llcgar 
ill mismo re&ullado comenzando la 
numcradtm tie inquicrdu a tlerccha 
parLiendu de un valor ink nor. E-.j.: 
mi se pueJe escribir 9 * l W cort «[M- 
(1,000-1) 

Lo cturcctLi es «CMXC1X« lUlXi 
+90+9). 

— Andlc.'igamemc ai caso anterior, a la 
dcrccha sc suma pudiendo llcgarsc. 
iai Mfim ya w bn Jicho, a ynxta- 
poncr hasta tre* de algunos srm- 
bolus. Ej.: XI1E-I3. CL =150 |es 
err^neo -LLL> ). 


MANCJO DEL PFtOC^AMA 

Dcspucs dc la car^tula de presen- 
[iicrt'm apnrccc un menu con las si< 
guienics updorics: 

I. NUMEROS ROMANOS A 
ARAB Els 

: NUMEROS ARABES A Rt). 
VIA NOS 


3. TABLA base DE rONVJ-.R- 
kiOn 

Cnnsideiando que dstc es utL prt>- 
sranna fundamental me nte didicticu sc 
hu 1 1 mnado la numeracion de 1 a cWiW 
para evitar lener que utilizer sfmbolwi 
«m " " o " ^ ” lu cual, por otra punc 
nit c^ muy frccucntc utilizer cn In pnlo 
lieu y mlemfa. ■udvoque se hag,a moLar, 
puedt indue ir a error veces colo- 
c-imos I os Dtimern rurnunw cm re dus 
mvirs hori/nniaJcH pam reniiLrcarlos > 
no ev nucvtni imenddn multiplicar vu 
valor por t.OOO u ntclusu pur 
1 , 000 . 000 ), 

En cualquicr caso iinitl)o> Eimiles cs- 
liln protegidos y d onkmudor bos so- 
India un valor adeeuado de fonriu ;uj- 
ttimatica. 

En I;l opcion 2 d ordenador umv 
bien ritss ivkii con el lclrero *NU- 
MERO ERRONEO" *1 jireiciitlcmus 
que nos tic cl cquivalcnic a un mi mero 
filers tie lo* limites espeeificuLlus, u lo 
que es petir, Si sc iratu Jc una colec- 
ciun dc lutfjli que rm liCncn eqLLi.su- 
Icnte u ineluHO si Li> he mi is ctilocadti 
Jc funiiii que nu fuun l.Lti las remits tld 
jLLCgO. 

MeJiarue la npcitin 3 puJcmus vi¬ 
sual Lzarcn panralla las combinacinnes 

biisicas Lir.jhe nTnlailo. 


COMENTARIOS AL PROGRAM A 

El liSLatlu del prCi^ninlu cslii ■sufi- 
ciencemenie detallado y Jucumenindo 
cunu> parm enlcudeiin wn ninguna d+ 
lieutiad e inclusti para ,idaplario al 
gusto del led nr. pern no nhst.iiuc va> 
moH a hns'cr wno* comenrarias gene 
rales.sobre ].i esmidura del progiamu. 

Ln caraiula Jc prcscrtaei6n cslii 
tem|Kiriif;idti con PAUSE 250, pero 
pouemos edtar el tiempt) tie esiwfa 
puhiintM ENTER. 

La opciOn elegitfa cn cl memi 
(L244MJS13) sctecciona el mAtUilo e»- 
rrespondiente. 


INPUT 33 






















La base tie las Jivcrvas opcractoncs 
sc centra cn un:t tabla de eortversibn 

campucsta pur dos matrices. Tf.j y 
T$fJ tlrlndc SC almacqnan respcctiiM- 
incnlc Iljh vatorts lirahes y romanos dc 
Ins valore* bjSsicos, visuatLzadm me- 
diariie La opeidn .1. 

Pflra 3a L-«ni-cndon arqbe'mmnno se 
Heparan k>s milbircv eemenus, deec- 
rtas y unidadcs, y sc alrnacenan para 
iu posterior manipulation en hi matiiz 
G-K La separation sc consiguc me- 
damte la linen ^2ll. situandocn C(l) 
Iji eilra correspondents ft los miIIarcs, 
cn C(2.l las oentenas, Eiusta Uegur a 
C(4J con las unidadcs., 

Luego sc hace la buvqucdu tespee* 
tiva cn la matriz T(.) t es deeir, sc va 
C-uinpiirartdo Caila clcmen tO dc C( r ) 
con las 30 vnlarcs dc l’{,} hasla cn- 
contrar cl adccuada. ntcnieriEO cm cl 
que se toma eL valor con CipondicnU- 
cn TSt'.J y sc yuxtapnne a S$, que es 
la string que va iLlrrueeiiiiriLio nneslro 
niiniepq nomano. Como puedcs obser¬ 
ver cn la I idea 560. no se lama loda, la 
longilud del valor correspond ente dc 
yj* que csla niLttrix sc ha defi- 
mdo dc longilLid life 4 v no siempre 
esrara llena del totlo, Asi. imics llu- 
mnmos a la svtinilina ubicadi cn la li¬ 
nes ILNK) la cuaJ nos dart la kmgtlud 
de La string KS (con el valor de TS[.) 
u unirl. No cs lo nn.snto sumar .l SS cl 
valor de TS^H’MM " con dos mo 
pactos, que el de K£( 1 TO 2)= H MM" 
EL proeeso es analoito para la con¬ 
version romano/jirabe, aunque cs mas 
lalKiriusvi. Sc Cumiertza OtpLoraridcj la 

matnz TS(.) par su valor iritis clcvado 
(MMM) y sc MJiah/j si dicha combi- 
nacibit sc ball a en. el numcro romurta 
dado, y pFccisamcnlu un, su parte iz- 
quierdft mas extrema (Buclc 37J* a 
4 ID), Si csto ocurrc tomamos el salo-r 
tuniifcricn correspondiente dc T(.), lo 
sumamos a N y elijmnamus las Icrms 
que yj hem os valor-ado (tinea 390J 
t|UL'd.indoilos COrt In parle ilerechii de 
la matriz,. quit Judo esc ECS | I TO i.k j 
lie mismaoperucidn que en la conver¬ 
sion irabc/ramjmn. subrulina LOGO). 
ConTtmuunos asl basin cl final dc la la¬ 
bia TSll). insTementando c] valor nu- 
mcrico que vnmos obteniendo, I Icmos 
de tener cn cucrrta que m heinos en- 
eunlr.ido una ctfra v/tlidft p.oa los rru- 



[iL-ires, ro pasaremos a eoinprobar cl 
siguicntc millttr. si no Li primera eifra 
de las eentenas, y lo mkmo con lasde- 
ccnas, nnidadcs.N l' serin vfllittes cl 
numcro mmano «CCCCC- par lo que 
una vez encontodo -<CC< * en TS(.) 
siriiiarcrtios n. i u pero no podrc' 
rrn>s jiegLLtr eampo>bundo En cifrm dc 
las L'cnEenav «Q '■■ ipic vena 21X1, ^ian 
qHC pasariamos a comptobar si existe 
cn la rruis alta cifra de las certtcnas 
dc 3 if.S que serfa Xt 'flien arabe. 
til contpsl de csta operation lo jj.es- 
tiona la subnitina situftdu en la llnea 
3t)IXi. Si Eli final del proceso no tpie Jan 
Letras por valorar cn el numcro ro- 
in a no. se presents cl rcsuluJncn pan- 
tfl.Ua. En caso contrario el numeroque 
heniOi ealculadd luihia esc momento 
noch buenoypor lolanto quiere deeir 
quo d eoiijunco dc Leras que prcien- 
dfan ser un .nurnero rumarnj vdido 
Lampoco lo son. 

5 REM ============= 

10 REM PROGRAMA DE 
CONVERSION DE 
NUMERACION ARABE V 
VICE VERSA 

20 REM = = = = = ===== = = = 
30 REM INPUT SINCLAIR/ 

MOL I SOFT FEBRERQ 87 

40 REM ... 

50 PAPER Is INK BORDER 1- 
CLS : BEEP 0.5,10 
6 p REM PRESENTACION 
70 PRINT AT 5.0; •**-^-****** 


80 FOR I-1 TO 14: PRINT ,, *" E 
TAB 31:”*": NEXT 1 
90 PRINT AT 20.0; '-♦*“*** 

t! * A a * A * A * A A A 4 A # # ife rt * A- 4 H # ■ 11 

100 PRINT AT 5 , 4 : PAPER 
^"CONVERSION DE 
NUMERACION' 1 

H0 print at 12,4; inverse u 

"'ARABE -> RQMANA => 
ARABE'" 

120 PRINT AT 15 r 9; PAPER 4 E 
"INPUT SINCLAIR” 

130 PRINT AT 20,13; INVERSE 
l: i 'Molisoft 1987 1 ' 

140 PAUSE 250: CLS :REM 
TIEMPO DE ESPERA 


150 DIM T(30): DIM TS(30,4) 
DIM C(4) 


160 REM DATOS DE 
EQUIVALENCIAS 

170 data i, B r P 2 * H ir,s f H iir, 

4 J H IVT t 5 t , 'V ,, t 6 1 "Vr p 7 r 
■ , VII' l ,8, l 7lir' P 9/nX'M0 1 "X" 
130 DATA 20rXX" l ,30. M XXX"„ 

40 P " X L ", 50," L". 60. "LX"', 
70, <h LXX", B0i *LXX)('\90 f 

190 DATA 200,"CC n .300. 

TCC". 4-00 ."CD'" ,50 OTP”, 
600,DC. 700, r ' DCC '",800. 
'"DCCC ”,900, ”C M ! 000, 

200 DATA 2000,"MM"',3000. 
"MMM"' 
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210 FOR 1=1 TO 30 
220 READ T(I).T?(I> 

230 N EXT I 
240 REM MENU 
250 CLS : PRINT AT 5,8; PAPER 
6;"CAMBIO DE 
NUMERACION"; PAPER i; 

TAB 8;™-" 

250 PRINT AT a,3;. H l - 
INVERSE i; H NUMEROS 
ROMANOS A ARABES" 

270 PRINT AT 10,3; M 2 - " s 
INVERSE IfNUMEHOS 
ARABES A ROMANOS 1 ' 

280 PRINT AT 12,3;"3 - N ; 
INVERSE lfTABLA BASE 
DE CONVERSION- 
290 PRINT AT 21,0; PAPER 7; 
INK 2;'PULSE LA QPCIQN 
DESEADA" 

300 LET P£=|NKEY$; IF 

Ffco"!" AND P$<>"2" 


PRINT 

360 INPUT PAPER 4; INK 0; 
"NUMERO ROMANO? 
(P=MENU) ";N$: IF 
N$="P" THEN GOTO 250 
365 IF N?- THEN GO TO 360 
370 LET 5$ NS: LET N-0 
380 FOP 1-30 TO 1 STEP -1: 
GO SUB 1000 

385 IF LK>LEN S$ THEN GO TO 
410 

390 IF Stfl TO LK) = K$(1 TO 
LK) THEN LET N=N+T(I): 
LET S3. = SmK+l) TO 
GO SUB 3000 

400 IF S$ = r,rl THEN LET I- 1 
410 NEXT I 

420 PRINT AT 10.0; 1 ' REM 
32 ESPACIOS EM BLANCO 
430 IF THEN BEEP L. 

- 10: PRINT AT 10,0;TAB 


U5-IEN N$}; PAPER 7; 

N$; PAPER 1;TAB 18. 
PAPER 7; INK 0; "NUMERO 
iTRRGNEQ": GO TO 360 
440 BEEP 0.25.0,5: PRINT AT 
10.0JAB (15-LEN N$); 
PAPER 7;N$. PAPER I; TAB 
18; PAPER 7:N 
450 GO TO 360 
460 REM ARABES A ROMANOS 
470 CLS : PRINT AT 0.2; PAPER 
6;''NL!MERQ ARABS"; 
PAPER l; 1 ' PAPER 6; 
■'NUMERO ROMANO" 

480 PRINT TAB 2; 


PRINT 

490 INPUT PAPER 4; INK 0; 
"NUMERO (0<N<3999) 
0=MENU ";N 

495 LET N=1NT N: IF N = 0 
THEN GO TO 250 
500 IF N<1 OR N>=4000 
THEN GO TO 490 
510 LET N$^ ,,,p t LET H$»5TR$ 
N; LET H=LEN H$ 

520 LET R^N: LET 

CtU-1000*INT (R/1000): 

LET R~R — OH 1: LET 

Cf2) = 100’" I NT [R/100J; LET 

R=R-Cf2): LET 

C(3)= 10 K INT IR. 1 10): LET 

CC4?=R-C(3> 

530 FOR L»1 TO 4 
540 FOR 1=1 TO 30 
550 LET S$ = r "" 

560 IF Tfl) = CfU THEN GO SUB 
1000: LET S|-K$(l TO 
LK): LET 1 = 30 
570 NEXT I 
580 LET N$»N$+S$ 

590 NEXT L 

600 PRINT AT I0.0; 1 ' REM 
32 ESPACIOS EN BLANCO 
610 BEEP 0.25,0,5: PRINT AT 
15U14-H): PAPER 7;N; 
PAPER 1;TAB 17; PAPER 7; 
N$ 

620 GO TO 490 
630 REM IABLA BAS3CA DE 
CONVERSION 



AND P$<>"3' r THEN GO TO 
300 

BEEP 0.25,0.5 

IF P$= J, r' THEN GO TO 

330 

IF P|="2" THEN GOTO 
460 

IF P5 = M 3 J ' THEN GO TO 
630 

REM ROMANOS A ARABES 
CLS ; PRINT AT 0,2; PAPER 
6;"NUMER0 ROMANO"; 
PAPER l; p ‘ PAPER 6; 
"NUMERO ARABE" 

PRINT TAB 2; 
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Ap |icaciones 


610 CLB : PRINT TAB 4; PAPER 
6 ; "TABLA basica oe 
CONVERSION": PRINT 
65C PRINT TAB 3; PAPER 4- 
‘NUMERO ARABE"; PAPER 
1 1 PAPER 4e m NUMER0 
ROMANO" 

660 PRINT TAB 3:' f = = = = = = = 
- = = ■= = "* print 

670 POR 1-1 TO 30 
€ 75 GO SUB lOOOi GO SUfi 
2000 

630 PRINT TAB (10-V); PAPER 
7 T(l); PAPER I;TAB 23; 
PAPER 7;K$a TO LK) 

690 PAUSE 25: BEEP (3.25,0.5 
700 NEXT h PRINT : PRINT 
MO PRINT AT 21,0; PAPER 2- t 
INK 7; BRIGHT l f FLASH I; 
"PULSE LMATECLA" 

720 PAUSE 0: GO TO 250 
'30 GO TO 250 


740 STOP 

1000 LET KS=TS(l>t LET LK=0 
1010 FOR £3=1 TO 4: IF 

K$(Q]<>" " THEN LET 
LK=LK+te NEXT Q 
1020 RETURN 

2000 LET VJ-STRST1I); LET 
V= LEN VSr RETURN 


3000 IF \>28 THEN LET 1=27 
3010 IF F>19 AND I<28 THEN 
LET 1 = 18 

3020 IF |>10 AND l<19 THEN 
LET 1 = 9 

3030 IF !>1 AND l<10 THEN 
LET 1 = 1 
3040 RETURN 


NO OLVfDES EL TELEFONO... © 

Cuando, por cualquier motivo, nos escribas, no 
Divides rndicar tu numero de telefono. Asi nos sera mas 
tecil y rapido ponernos on contacto contigo, Gracias, 


GANADORES DE LOS MEJORES DE INPUT SINCLAIR 

En el sorteo carres ppndiente si numero 15 entre qui pries eseribisleis mandantfo dub sties vctps a LOS 


MEJORES OE INPUT ban resulted d ganadDres-: 

NOMflRE 

LOCAL! DAD 

JOE GO E LEG IDO 

Julio Solo Vidal 

Cartagena (Murcia) 

FFRE LORD 

Albert Gapflld Lopez 

Sant Carlas de la Rap Ha (flama) 

JAIL BREAK 

Roger Fernanda? Espuny 

Sant Doi de Llobregat iBarna) 

TWO ON TWO 

Josep Fit6 Aulin-a. 

□dot (Girona) 

LEADER BOARD GOLF 

Marc Grau Bel 

Sant Boi de Llobregal iBarnai 

GREEN BERET 

Luis Miguel Diaz Blanpp 

Madrid 

GAME OVER 

.1 Carlps Pi re? Alwre? 

D Ba^co tit Veras (Qrensej 

COBRA 

Jpse Luis Ares Marlin 

Alcorcon ( Madrid) 

BASKETBALL 

David Asqnsia Reyes 

CAde 

GHOST fi GOBLINS 

Jordi Mtiflp; Arcarons 

Masrrau I Barcelona i 

THE GOON l£S 
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LOS MEJORES 
DE INPUT SINCLAIR 


PUESTO TITULO FOfiCENTAlE 

1° COMMANDO . 26,9 % 

2° GREEN BERET . IS,5 % 

3 0 SABOTEUR .. ! 1 ,6 % 

4° GHOSTS'N GOBLINS . 8,9% 

5° S1RERED .. 8,3 % 

6° RAMBO . 7,7 % 

7° AVENGER .... 7 % 

8° COB/M . 5,8% 

9° SKY FOX . 5,8% 

10° PHANTOM ASH . 4,5% 


100,0 % 


Para ta con/cccioit tie esfci relactCm iinicamente 
se /tan tenido en cucnta (as riolaf/ories enuiadas 
pornuestros leclores dc acucnio eon Li seedon 
..LOS Hi:JOKES INPUT,.. 

Marzo tie 1987 
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Ap licaciones 


LA MUSICA, LOS MICROS 
Y EL MIDI 


EI tuKtr music* con lu ordenador no 
os masqaeun pmun de piHriidii- Iji ill' 
[rnducci^n dc equipus hradc* eii eJ 
MIDI tc permit? eoneciar lus ortfena- 
dores con tos sinteliuidori^ nnskoies > 
p&sar de uno-aatro. 

FT] sonido se ha comenidn en aria 
de I its principales earacteristiiLas que la 
mayofia de La gcntc cspcra tncontnir 
i.'ii un irticiOOrdcnador domn*H[ico, 
hasia cl punk? dc que hay personas 
uuc pueden sentirse inelinadas a com* 
prar Lin ordemadar determinadQ a 
causa (iti hus posibilidadcs sunuras. 
Aphrtc de |a rmi^icii que puedn* hneer 
to it tu ordenador, eslii empezando a 
introducinsc y a estar cada vez mils fi- 
dlmente drsponMc la positiilidad de 
coneclar machos microordenadores 
dortl^stieos :l »rtlrtizaddi» y a iliras 
dases de insU umenKm musicales. El 
c-Hiandar TOrrespomiiente sc llama 
MIDI, Interface Digital para Lnstra- 
mcnlos Musicaks (Musical Instra- 
mem Digital Interface] y te b rind a una 
nucva gama de posibks miliracimncs 
pata iu ordenador. 


EL SONIDO DE LOS 
ORDENAOORES 

El sonido que son capaces dc pro- 
ducir los ohde-nadores ha evoLucionado 
enormemente dtrsde los pitidos y zum- 
bLJoS producidui pur Ioh prime rdS mo- 
delos que incniporabisn sonidos. hasta 
la posih-iliihid dc ejcciatar trozos mu- 
si coles y producir olios cfeclos sono- 
ros. El Spectrum ic ofrecc unos sotib 
das muy send I Los par medio del eo- 
mando BEEP y sus iiota* siempre sue- 
nan i guides; se train dc un auicntico 
rono electron icamenic puro. Ademds 
en esie ordenador no se puede pro- 
dudr dende el IiAStT m:is que ana 
sola not a al micron (iempa. 

Si has prtibada alguno dc los pro- 
gramas Jr rruisica que hemm publi- 


eado en INPUT, ya sahris to que cs 
posfble eonseguir eon iu ordenador. 
Induso los sonidos mis sofisricados 
prodauidos cun d mils sofisiieadc Je 
los Ltrdenadores, son de una ealidad 
inferior a 3a l|«c nus tjenen aenMum- 
tir.dns Las trakaeione-, norm ales, por 
no mencionar Los inconvcnicntes dc 
intentar ejeentar wn fragnaento musi¬ 
cal con un teclado QWERTY Include 
en cl caso mils favorable, el micro si¬ 
gn? eseando por dcba|o de an instru- 
mento muviea] cnnslruido delihcnidri- 
mentc para scr utilizado pomo cal. 


IN ETRU MENTOS MUSIC ALES 

L* hisloria del desarmllo de I os Lns> 
trumentos musicaies en las ultimas dd- 
cades ha seguido un desarmllo bas¬ 
tard? pataleEo a I de his m/iquinas de 
calrular- Los insirumenios uudicki- 
nnlcs cran mccamcos; trozos de ptcl 
que sc golpeaban, eucrdas putsaefas o 
frotacks. elc, Poca a poco, la necesL- 
dacl creeienxe de consegair un mayor 
voLamen rn Lds cnneierlus en vivo y La 
■tecesidad lie haeer enibneion.es, tia 
ido condaeiendo a qae s« vavan elce- 
rrifteando insiitime.niOH to mo ^uiiri- 
rraS V pianos, hjisla dssptmer Ii rial- 
men tC. cn lo& uliimoa ahos, de insl ru¬ 
men tos muiiLcales purameme eEectrd- 
nii-us tales como Icisiiinterizadnres. DC 
La rttEsma forma qae las mhqutnas dc 
ejdcujar ban evoluciomido desde cL 
^haeo mccanico hasita el niodcrno or¬ 
denador que tncorpora tecnoiogfa 
eketrdnica digital, los alamos insirid- 
memos muhicales qae ban nparccido 
cslan UcitO> dc eireuitos intcgrados. 

Los simeikudores miMiernoH son 
unas dispositive# cxir^ordinanamente 
SOt'isticadns. L-,n lagnr del numcro ti- 
mitacki dc nplasqac pueden ser intCT- 
preiedas cn un ordenador, v del nu- 
mero limiiado ( o ineststente) de Itpos 
de cnvolscni.cs, ic cnconlraniscon un 
asomlnKfl TOnjunto de posihtlidadcs. 
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Ap |jcociones 


■ _ SIHTETIZA0QRE5 

§_ 5QHIPQ FOR OHOENADOR 

■ INSTRUMEHTQgMUSlC ALES 

1_ TtCLADOS 

■ _ MAQUIHAS DE PERCUSlON 


■ 

LA INTERFACE -MIDI* 

m 

CQNEXION DEL OR.DENADOH AL 


SlNTETIZADOR 

■ 

POSIBILiOADES 5DNDRA5 

■ 

SOFTWARE 
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I n sintCliEpdOr tipifO de prucio medio 
te pennitiri I a cjecudfln dc weordes dc 
hastfi ocho notas an un reel ado ade- 
cuado, Casi codas las maquinas ofre- 
cen un eonjuntodcsonidos preprojini^ 
mados. por 3o que si quicres lentr cl 
&omdo de un piant> a un violin no Ha¬ 
nts roSs que pulsar la tecta adccuada, 
Pero no codo sc queda cn los sonidos 
preproparnados: puedes jugai con Ins 
ideas que se te ocurran Junta producir 
ccui cu&lquier sonido que desees. El 
mjciio del publicism con un si. 11 te 1 .i 2 a* 
doi que puede llegar a ser una or- 
quc$ia cmnplcia. no esui disponibli* 
tods via. pern prohaMcmcnlc cstA ya 
acechando cn Ja mcnlc dc alguicn cn 
alguns parte. 

Cuflndo sc inencionan Los sintrtiza- 
ilui e $. casi codo el naundo pietisa in- 
mcdiaimricnie en Ins insirumeirtos dc 
tceEadoquc constiluycn con mucha di- 
fereneifl el tipo mis currie nte de sin- 
tcrisador. Peru dado que rca]mcrtTc el 
cciniznn del sintelizjidgr us una cnjfl 
qua eontiene una electronics para pro- 
dufir sLuiidos, la cue] puede ser :ila- 
cada pflr a I pun TipO dc serial, cn pura 
teorla no hay razPn pam que no se uti- 
lice cHro tipo de mslrumemos para 
atacar dictia electron kn, Bn la prac* 
uca, Fa cosa cs ligenmcnte diferetitc. 
Por dtversos ra^oncs, tfeniens, cl tipo 
lie sinlelizador musical mSs popularsi- 
^ue siettdo el dc leclado, si Ken pue- 

dei; comprur SiitleUzudoFcs lipd y.ULUL- 

rra, que se lOMIrt exacts meflie igual 
que una yuit.LTr.i .mu que sue mm enmn 
tu qgicnih que suerten. Tambidn buy 
sintctizudnres dc pcrcusiun, diicrcclcs 
de las mAquinas dc pcrcusidn suite- 
ticu,quu se tocan golpcHhdosnbre una 
sera dc almohadillas. 

Por otra parte las maqmnas dc per- 
fusion esiiin preprogramadas para 
proportional un soporte rltmico sin La 
interveneirin de un ejccutante. Fcro 
iam Ken iiUis caen dentro de la caie* 
gnrin de sintelizadores. Hasla hue 
poco licmpo, Ian m&qumas dc pcrcii- 
sidn Ionian un sonido muy earacteris- 
uco. por lo que cualquicr grabacidn 
hccha con uma rmiquinn dc dstas cn 
vcz dc con un vcrdadcro inslrumcnto 
dc pcrcusidn era rcconociblc id ins- 
tante. Con los ultimas avances de 3 j 
recnoJogia. ya no puede decirse esto. 


Cflsi todiis Iji.s tniquinn; de percusibn 
ofrecen unos cuantos rilmos prcseEcc- 
cioiifldos H poseyendo ademis nna ca- 
piLcidtid de memorta que it* permile 
crejir y almaccniir tus pro plus esqus- 
mas rftmicos. 

Estii uEli mu posibihdad de Las ma- 
quinas. dc pcrcusrdn scnnLa el caniinn 
hacia una verdadera revolution en lo 
musteaL Hasta ahora 3a habilidad mu¬ 
sical sic m pre haNa dependido de al- 
gtin tipo de destrezn manuaK es decir 
dc la posihilidad dc mover los dedos 
con rapidez y predstdn sobre un te- 
ctado. o dc podcr poipear con preci¬ 
sion una membianu cn el instante 
juslo. En Ins mslrumenlOS.de vienio, 
B babilidad consisle en ccKirtlinar ul 
LiiDvimitLilQ de Ins dedns, cofi las di- 
fcrCnleS iftovimicmos respirultirios. 
La lle^adu dc las: instnutiealPS niusi- 
cales pmcramahlcs modifies por com- 
pteto estc panorama, 

La mAquina program able dc percu- 


stdn no sirve enmo suslitutd del la- 
k-niti muytral Sigue Kacicrtdn fa I ta al- 
guicn capaz dc entender cl rilmo y de 
-oir - cn su mcnlt cl efcclo dcseado. 
Lo que hacc la nniquina m liberar a la 
per^>n.i dotsida de ta lento musical de 
esa dependencia de ia tiabilLdad m;t- 
nuaE y de la iieL-esidLid de ndquirir un 
instnimcnto de percusidn ciro y vo- 
lununoso. 

Lo-s suaiutioilDieH Jc tcclfldo ticnen 
yj la posi bLIidmJl dc son m r vi rtu :ij mciM c 
tome tuaiquier mst rumen to que tii 
clijjs, Si a elk sc 3c ansdc En pL^sibi- 
lidad dc props mar sus cjccitctones, sc 
ahre tocio un nuevo mundo musical in* 
clusn nmt los que parecen tener una 
juano con cinco dedos gordot. Enirn a 
MIDI Utt sisitiUii que te permile Ln- 
corporur la programaciin en d s-inte- 
tizador, 

Ahora que Los ordenadnrcH y Ins 
iitstrumentos iuuslcuIcs cmplcan cl 
mismo tipo de tetnoLogfs. cs rclafiva- 
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ApliMtion^ 



mente fact] enviar inform acidn Llcsctu 
ii n ordemador a un Lnstrumentu musi¬ 
cal v vice versa; esca cs la funcitfn dc 
MIDI. 


jQUE ES EL MIDI? 

El MIDI cs un eKl.'inJar de inter¬ 
lace. como ocurrc con la Centronics u 
la Its 112 con las quo yu te huhrils cn- 
contrado dfi rclactdn ton pcriftricos 
[ate* como impresoras y mtideim. Hu 
cstc caso. uunque el MIDI *e utitizu 
ejrd usiv auiente ert concxmn co n d 
mLinclii de 3a miinio, el puptl dc la in¬ 
terface cs exociamcnlc cl rnismo: la 
transfersncia dc informacibn dc un si- 
lio a otro, con un formato nnrmuli- 
zado. Sn principal f'unddn comn ch- 
tnudar cs garanlizar que la in forma- 
cidn se transmits de tat forma qnc 
cualquier tipo dc cquipo compadblc- 
MIDI »n capai! dc entender h infor- 
nmeidr que redbe. 


Ha h abide varies interne* anterio- 
hK para importer una norma dc co- 

municaribn cnlri- inslrumentis trlLiSi- 
c Laics, pc Hi nrti^LLrtLi dc ello* ha con * 
scEiiiilo lojintr unu accpisddn gene- 
ralizada, En el caso del MIDI, las 
pcrspcL'ti'i-Li^ pu retell scr difcretiies. ya 
que Uidon Un sin Letizadores V lEii'iqui* 
nms dc pereusibni producidiis por la* 
do* pi incipale* fabrics nles tie teclodos 
del imnido, Yamaha v Roland, sc 
adapt a ii a la nueva norma y actual- 
menre esti baeiendo so apurteibn unu 
nueva jama dc urJenadorei eompiHL- 
Isles con dicha norma. Farecc scr que 
In norma cb universal mcnie anepiada, 
tanUn po r los f ahri ran fes dc instruipen.- 
tos musicatcs clcctrbnicos fnmd por 
los dc ordenadoncs susceptible* de *cr 
concctidos a el los. 

Todo equipo compatible con MIDI 
dene ires eoncctorcs DIN tie unco pi¬ 
nes. que llevan Ins Jenciminiidtmcs 
=dN», “OIT- y *THRU* (alguno* 


equipos MIDI mis anljguos puede 
que no lievon el collector ■ THRU*), 
El conecior -[N- perm ire que el 
equip* rcciha snlak-s MID] desdr 
otro equlpo MIDI. Con 'OUT* ool¬ 
ite exaclomente lo eontrario, permt- 
tiendo que un equipo MIDI envfe se¬ 
riates MIDI a o-tro cquipo MIDI. Por 
medio de «THRU« ft; cttvfa Ulia topi a 
directu de ta information que |e llcga 
a un equips MIDI hadu ertro equips 
MIDI. Eslo signilu .i 111 L’ sc puedu ue- 

iLt.ir'Mthrc varfosdLupiisilivos al niismu 
nempo, cunccEiindolos a 1 raves dc sus 
coneetores -TH RU ■■ Por cso tos cqui - 
pos quo no tlisponaan del concclor 
«THRU'v ftiu tiiueho mJit limrlados en 
hus prcsiacioncH-. 

bil cstandar MIDI pcrmdc (ransmi- 
lir separadamente hs-isia canales dc 
inform acid ji A mismo tlempo. Cada 
cnnal pcrmiie al mdsico controlar un 
Lnstrumcntin por separiitlo, pero la in- 
forFirncifin ccie>iisie sobic d mismo 
bilo. Cada disposilwo ":sc si ntoniisa * 
con la tnformation que sc le csla on- 
viando. Jc uili forma algo wmejartie 
a Eli que lie lie urt televisor de &i rltoni- 
zitrsc cn un dcfcrminatltj canal. 


^COMO SE UTlUZA Et MIDI? 

EL MIDI esti en el inenado desdc 
I9S2, auiique en prirttipio sdk> I lamb 
la aten-etbn Jc untni CLiantos propietn- 

riOs de micros dnmenllens, [jink miisi- 

t<rs him uiitisado cl MIDI p*Lr;i atacar 
u nos inslnimenlos a parrir dc otros, 
Por cjemplo. sc puede hneer que dos 
sin.[eli^LidH>reH produ^ejn Munidtis di- 
le rentes, pern :d iiusmo liempit a par- 
tir dc un solo tcclado. uoneclando 
pa ill ello Limbos inslrumenlos por me¬ 
dio dc urtfl interface MID] y tocando 
en el iccIllJo de mio de ellos. 

El MID] l.imhiCn perniilc a un mii- 
sito ccmtCEar Liita niaLpiana de percu- 
Hi(iri a un Iceladn y sincrori/ar un 
nlmo con una dc terrain adn mclodta. 
lambi^n rs posiblc concclar un sc¬ 
ene nciudor, Lin sccucnciador cs un 
dopoMiivo enpaz dc recorder In que se 
hn toeado y dc volvera cjecularlo, Los 
Itay de dos liprra: de riempo real y de 
Plisok.. L' it secue nci udor l lc nc m pLi rca I 
cjccuta csactamcntc Isi que cl mtfsico 
ha locado, mientras que un secucncia- 
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dor por pasoi literaLmontc va reeo- 
iriendo la rtielorfia paso a paso, mien- 
tras cl imj^ico va loauido las. rrntas una 
a una r ■CLibiieniJo los Lnlcrvylos nidi- 
viduales dc dempo ha&ta que sc com- 
pleta toda la melodia. 


EL MIDI V LOS OfiOENAOOflES 
OOMESTICOS 

Coinc idle nek) con la aparidbn de los 
ordenadoies que utiliMh d estdndar 
MSX se ha dado bastante publiddad a 
la relacidn cm re el MIDI Ids, micros 
dom^sticos. Y-iirttuha ha inlroduddoel 
ordenador musical CX5M, que es uji 
ordenador MSX con un simeiizadoi 
incofporado. Si a es.ee ordenador se te 
Hiiade un iccliido de lipo pianist ico, cl 
propietario sc cncucnlra en, poscsidn 
dc nn autlntico sintetizador bccho y 
dcrccho. Est« mftquinn hrindH totfn 
dasede poahilidadcs a los musicos: sc 
puedc eomponer sobre la pantalla de 
un monitor, o se puede utilizar d nr- 


depudor coma sficueneiador sm ueee- 
stdad dc riLiL.'ur. hardware adidonal, 
El costo de cstc nrdenador supera. 
OoruiiderableineiHe ^ deun Spectrum, 
p-cro pucdcs tencr un dispositivo pa- 
reeido si utilizas tu ordenador conec- 
nVndolu y un sintctiutdtir MIDI. Para 
cElo ncccsilas, unn caja dc interface 
MIDI a la queconcctar in ordenador, 
un concctor y un poeo de software. 
La caja de interface. euyo custe cs 
inferior ai de un Spectrum, te pemu- 
liri COncCUr lu Ordenaifcir :l cualquici 
equipo que sea compatible eon la in¬ 
terface MIDI. En la actualidad el pre- 
cio de los sintelizadores compatibles 
eon MIDI cs fiasliink 1 superior al de 
un Spectrum, por lo que cn realidad 
constituye unu via muy turn para que 
Lus usuarios de or Jen ado res domdili- 
rOfi cstiCpdun el CUrtlpO dc su$ hubili- 
dades musicalcs. pern a I ie,u.il que 
imtuitc con Lhs impressiras. los mcmi- 
tores de color y |;ts unidades de disco, 
sc puedc predeeir una caida en cl pre- 


Ejempfo dc MIDI erdiizuntlv un 
pnlenudur. itttti mdqtunti de 
pcrcitswn y \sn xintetizodor Lu 
infannucidn imt.ui dl xt puedc 
(ilmuecimr en el disco. 


l'lo de los InslrumenUss. En un Eiituro 
no lejano, cl preciode un sinletizador 
resultara probablemente comparable 
al dc Ins micros dom^sticos que puc- 
den utilizarse para controlarkn. 

Rem incluso antes Je que se pm- 
dttzca esta cafda de prerios, Jwposcc- 
dores de cquipos musicales compati¬ 
bles con MIDI cons idem riln que ueij 
combiriaririn de ui: micro domesiieo y 
una interface MIDI cs una altcmaiiva 
muy aintcliva. Con un software ade- 
Cuadu se puede disponer de un amplio 
marten de posihilidades y sc puedc 
diiponer de una si tan cartidad de cfee- 
IPS ynadidsft ;i un eOSle muy modt- 
rsdo. 

Cutmdo un cirdcnnidor dom^stieo sc 
coneeta a la iincrface MIDI, nose uli- 
lizan para ntida las eapaeidudet sono- 
ras que tneorpora; cl son i do sc genern 
siempre en el sintetizador o en la mi- 
quinn dc perfusion, por lo que no cs 
prcciso ndqurrir im ordenador muy 
cam para utilizarlo e&pcdftcamcnlc 
con u] MIDI Es importante darse 
cucnta de que no liny nmgunti ventaja 
real en utilizer ordenadores profesio 
nales de alio precio en lu^ar Je micros 
domesrieos. Indu.so la eanijdad de mc- 
ntoria udicionaj dc que disponen los 
ordettadorcs profesionalcs es en gran 
parte superflua. ya que el cspaLLU de 
memoria normal de un micro dom£s- 
tico supern amplLauaente. por ejem- 
plo, al de cuylqutcr scevenciadur. La 
ides nnsicn cs que un Ordcnador al que 
sc puesla concctar una interface MIDI 
es tan hue no co mo cualqu icr otro. 
aunque ni uli era ser que en el caso del 
Spectrum de 16K ic eneuentres con La 
eapaeidad dc memoria li^ci ametue IL 
milada, 

Kay que destiiear ademas que la ca- 
lidad dc] son Ido dihponiblc mi eMa li- 


Un hiv, de MIDI puedc mntener 
hosia 16 carndex de informeddn que 
CQfiiwokn Qtrps tantps instrumcrilps. 
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m Linda pof £( iftCdio lie gfabaeiun. 
Como ui sonido st almaccna digital- 
mente, se It puede uomptirai con ul de 
li 11 medio coma cl del Compact Disk, 
tn vez de la rinta a la que se It puede 
:tin -.1 iJLc todo lipo die n.mlo indcseable 
Eji otraa palabras, l.o quo sale do an 
sifltema MIDI es exactamcnte iguai a 
lo que cnlia. 


SOFTWARE PARA EL «MIDI» 

L.'na vcz quo ya l engax cnganchatk? 
lu ordenador a un mst rumen to musi¬ 
cal por medio del MIDI, nocesitaras 
aljun software para que funcionc. Ac- 
Lualrtitnte Laofeitaes todavl'ii bastarile 
rebiringida y comparable en predo al 
software eomercial disponible para ce¬ 
de n adores domestteo-s. Ea situaci-bn 
i*4 eamtuando a medida quo haya in«is 
geme que use el MIDI. 

No oftstanlc. iitclilSo cfln In cscasa 
ofcrtn que cxistc aclujilmente, ya huy 
programas quo le permiteii Juplicar 
seoicnciadcrch. contponor musica en 
varias pislas y editar tus propi^s mc- 
Iddias. Las oferia* conct mas varlan de 
unos Iabricarii.es a mros y du unoi or- 
den adores a otros. 

Aunquc to cemsidcres incapaz dc 
ejeeutar ana naia cn un insttwiento 
musical, le cneonLrar&s eon que puc- 
dti interpretar iniisica compucsta so- 
brt cl moniior dc tu ordenudor y en- 
vinndo la infoon&dtin al instrumental 
musical que Im deejecutarla. Tiuifoien 
putdes almacenar la composition cn 
disco o emla para haucr Jesputx play¬ 


back u para cjcdltsirla cn otru nm- 
menta- Sc preve la gxistenda dc hojuS 
dt musica disponiblts cn LPROMs 
eodifkadas cn formato MIDI, por la 
que sc Ttndnirt pjeza-s comp lulus eje- 
cuiubles de forum paredda a un disco 
o dniii, o bitn para iocar ol mismo 
licmpo que st hnce un playback con el 
conicniiio Uc umi EPROM. 

Un pxqueEe lie software ifpico del 
MIDI es cl program a compositor du 
liidsica que it pc runic ir const ruyendo 
Eli picza sobre La panlalla, de forma 
muy parccida a cwnn la Cgtribirfo-S 50- 
bre el papet, incorporanda las notus 
sob re un pentagrams. Unas utilidadcs 
completes dc edition y ejccucidn le 
pemiiltn comprobdr el eslado dc 
avance e introducir modtficaciones en 
t;a pancalUr 

Pcro no lcrniin.:i aqut la cosa. >'3 que 
un buen software pondrj ademis a tu 
disposition lodas las posibilidades del 
siiniciizador. Pucdts controlai lantLis 
vfjctL. HJinuliiiLcxs como pcrmiia el 
sinlclisador: un smlelizatior pulifdi- 
nico lipieo de flltn calidad puedc Llegaf 
a ejecular basin 16 nolas al mismo 
Eitmpu. Puedts eicogerlas demro del 
marge n de noias prcpiogramadas o 

comhinar nucviis nola_s. Si lu airtieti- 
zador I ienc la |n■ sibilidad dc dcsdoblu t 
cn dos cl tedadu, ]>uedcs icuer dos ins¬ 
trumental diferentes sisnando al mismo 
tiempo. por ejemplo, una uicIckSb y su 
acompaAamienio. En general hay tre^ 
ispe's de information que puedes enviar 
al MIDI: nolas, cambios dc program^ y 
mczdaSi de sonidos. 


En lu adualidnd bay un tonjunfo 
normalizado dc c6digos MIDI, que 
functonacin con cualquier sinteiizador 
compatible-MIDI. Toro dicbos cbdi- 
gos s6to str\'cn parti cortlrolar las fun- 
clones rmis bdsicas dispon^hles. Sc 
puude aweder a otras pre&tacLones cs- 
pcciales por medio de sisicmas dc so- 
dilicacion L’XlCrtdidus que normal- 
mcme vaifan dc un insirumenio a 
oiro. Como consecuencia, una pie?a 
compleja con una orqucatariAn va- 
riada puede exigir La familtarklad con 
un gran numero de tiKliccis MIDI, S3 
bicn es muc jxusible que cSEO se snn- 
pbfiquc ecmsiderablcmcniC cn cl fu- 
luro, 

Si 1c conn id e ras un proy;rnm..ulor dc 
oidenadores y no un musico, no por 
cllo ricnes que desanunartc para uti¬ 
lizer cl MIDI. En eicrto motto cicnes 
alguna ventaja. Si puedes proeramar 
en codigo rnaquinn, no hay nada que 
te impida cscribir lu propio software 
para cl MIDI, carl ado a la medida dc 
tus necesidadcs, con lo que adoimis te 
aborratas cl gasloque supone la com- 
prn dc un software camera a I, 

El MIDI pttrece oftecer muchas po- 
sibilidadcs al cmisico coraa al no mu- 
sico. A mcdtda que tos prcciosvan ba- 
jando, Los instrumental musicalos pa- 
rccen esiai desiinados a abrirse ca- 
tnino cn la mayoriu du los hogarest 
fqui^n sabc si llegaran a gencralizarsc 
Las veladas musicales cn Kirnu a I sin- 
tetizador! V udEmis tendrtis l.t Opor- 
tunidad de llcgur a ser realmente crea- 
ttvo con tu ordenador. 
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Cddigo mot1 oina 


PROGRAMA ENSAMBLADOR 
PARA EL SPECTRUM 


Si [f uburrc mu n ejar cl a! os cn hexa- 
[terimn I, ipor q Lie no hneer qut I u Spec¬ 
trum sc cnrarguc [f c1 rad urir 1 its Mstn{few, 
cn kiiKuaje ensambladyr » tod icy laiii- 
quina, cn lujjardc 1 teller (|ue hnrerlu hi? 
Lncluso cakularft la kMigitud dr los *ab 
tos. 


F.l ensambfado .i mano cs unn tare;:i 
muy lediosa. Induso aunque te sepas 
dc memoria tod os los eddijjus tie ope- 
nlibbli y usids famiLiarlKudocort I us di- 
fcrcnles modus de direccionamiieTito. 
En tr.iduccii.in a eddiea mtiquina del Eis- 
[ado dc li <1 program a largo, uklnIli cn 
lericua jc cusainbhdor, y sll posterior 
ibiiQduc#>n en cl Ofdcnadar con 
nyuda del monitor dc cddigo m^uiirn, 
cs un trab,i]o estraordinurtamente 3a- 
boriow. 

E.isfi ordcnjidorcs son miry huenos v 
cjc;ll-[os cn Ea rcalbneibn de l.'irc.ns re¬ 
petitive, por to -que! pueden suplinc 
en la reaJizacibn dc fas niisniiis. Ade- 
riLis pqjedes unilizai d mismo pro- 
grama piim POKEar nl mismn iicmpo 
cn In niemona cl cddigo miquinu re¬ 
fill a me, 

El pro grama que si cue a continua- 
cirtn es. im ensambfador para et JSfjpec- 
irtmt dc JSK tn un Spectrum de IGK 
o cn qn ZXSl no hay sunticrtfc espa- 
do en la memoria para ejecular un 
prog Mima dc c sails ear aUeml teas. 
Para qua cscos programas scan ade¬ 
em ados piiTii sll publication, ticncn que 
eSIar escrilos cn BASIC, por lo que no 
sun ian rlipidos cornu Los niunitores en 
o6digO iiU'iljuiji.l Ctuiiciaalnienle tLi h- 
punibfes. 

Sin embargo, funcionen bicn y sc¬ 
ran cap aces de cn^imhl.-ir los prngra- 
mus cserilos en Ecnguiijc enK.imMfi.drJr 
que le encuenlres cn Lis libros o CP 
INPUT. Por k* demits, hams burn cn 
ir a tom&itc un caSe mien Iras el cn- 
SAmblador del Spectrum se enfrenm 
con on program a muy largo, va que 
poedc que tardc un eicrlo liempo. 


5000 


5010 


5020 


5030 


5040 


5050 


50 &0 


5070 

5080 


DIM mi 10,4): DIM 
k(110)i DIM mU10); LET 
h$ "0123456 7 89ABCDEF"; 
LET b5="'L LET 
&$ = "0123456789a bedef" 
DIM tSdOO.24): DIM 
rtl00): DIM z$( 100.6); 

DIM zU0O) 

DIM b(9L LET b( 1) = 1: 

FOR i=2 TO 9; LET 
b(i)«b(i-l)+b(i-lh NEXT 


DIM rS(8,4.4); FOR j=l 
TO 4: FOR i=l TOS: 


READ rSa.j); NEXT NEXT 


I 

DATA "0YT - ,"2V - 3' t l 

4,5.0, f , f\Z . Z , 
"n c", h c “, "po"," pe ,r , 11 p '\ 
"nr. "0", "3”. ” 1 &'■, "24", 
■■32 M . , '40 , ' 1 w 48 , ‘ l "56 ,i l 
, 'iirv , i^:'iy , ' 1 n bc";(ie ,, 1 

ML I IB n*,^ll IB IB 

n! , £p , 

DIM s$(e,2 1 4]: DIM t(]S): 
DIM u$(10,10): FOR j- 1 
TO 2: FOR i=l TO 8/jt 
READ 5$(i,j): NEXT it NEXT 
Ji FOR }=1 TO 18: READ 
NEXT j 


DATA <r b rt ,”c","d^/e". 
"h ir ( f T\ rt {bir. t ’5 N / t bc" 1 
"de"." bJ". J, sp 1 ’, 23 5 P J 'd e* 
a,: , af , L277, , Tsp) H , 60742, 
, '0 l ',6075e, ,r r’,60766 r 
,f 2 ,? ,233> ,, fW) ,, i 56309, 
’WL65001/’(iyrj0, 
"(be)", .25/^)", 60767, 



5090 DEF FN j(x,i) = lNT 

x-b(i+U‘INT Wb(i+D) 
5100 DEF FN e(i$,j$Wi5»|f( 
TO LEN (i$))J 

5110 FOR i- 1 TO 110: READ 


"r".2,''(bcr, 18,"(de)", 
6075 l,"r",249. "Sp", 
60743, "P', 60759, "i" 

DEF FN b(x,i)=INT U ; 
bCi+l})-INT (jc7b(i+23)*2 
DEF FN x(x, 
i)=K-b(f+2)’FN b(x. 
i) + bli+l> 


k$n),kfi3,rn{lh IF NOT FN 

d(.,kS{i» THEN NEXT i 

5120 DATA "ld'M0,10/Ttr,26. 
10, "Id", 60767 p 10. "Id", 
60759,10, "Id", 2,138. 
"Id", IS, 138,"Id",60751 
138. "fd".60743, IBS, "Id", 
64.22, ''Id", 50.202. "Id", 


SO INPUT 







codigo mdqui* 


■ TRADUCC10N DEL 

■ 

FUNG ION AMI ENTC 

LENGUAJE EN5AMBLADOR A 


DEL PROGRAMA 

CODIGO MAQUINA 

■ 

PDNIENDOLO A PRUEBA 

■ ETIQUETAS 

■ 

LDCALIZACI0N 3E ERR ORES 

■ E5PADS0 PARA VARIABLES Y DATQS 

■ 

programatrazador 



4 4 

o *** 

'Y*+n K O 


58,74 P w ld J \249 P l39, M ld M 1 
34,195. "Id", 42.67. "kT, 
60779,197/ld\G0771, 
199 1 ,, ld" P 97 1 165 H rt id‘ 1 64 J 
54 

5130 DATA "ad c ,f , 136,50, 
"adc".60746,3, "add 1 , 

128.50, "add", 9,149, 
"and", 160,48, "or'Yl 76, 
43. J, xor", 168 , 40 ," nap ", 0, 
0. "sub". 144,4&, 'sbc'\ 

152.50, " s be”,$0738. 3, 
“cp". 184,48, "ip'M 30.45. 


''jp'',233.9,Tjp ,r ,56609,9, 
"j p ", 65001,9,jp' 1 .131, 
49. , 'ir’ , r 96.45, h jr",68,41 
5140 DATA ''call", 132,45, 

''call' 1 ,141,41, "rel", 201, 

0, M dj nz rl ,74,40, "dec ‘',11, 
17» ll dec M ,5 > I6, ir inc l ' 1 3,17 1 
r1 inc‘ , 1 4,16. "push", 197, 
17, M pop' h l 193 l 17. , 'dE , ' 1 
243, p," ei“, 251.0, "ha 11 " t 
118,0, "*x". 235,139, "ex", 
6 r 15. "ex'', 227,143, "exx", 
217,0 


5150 DATA "rat", 199,132, 

"rts 1 *, 192,5,"bif ,52032, 
20, "def b ,r , -256,40, "ccf", 
63,0. "sc r. 55,0, "cpI ",47, 
0, "cpd rl , 6 0841,0, ,r cpd f H r 
50857,0. "cpi", 60533,0, 
H epir'\60349,0, H 'daa",39, 
0.”iiri'\60742,8. ,h iirr, 

607 5S. S," i m", 60766,8 
5160 DATA "ih",60736,130, 
“in", 149,42, "End ",60648* 
0,"tadr\ 60810,0. '"ini", 
60840,0, "ldd’ ; ,60840,0. 


input si 



































”Fddr' 1 l 60B56,jfi. l, ldi", 
60832,0."ldir".50843,0. 
"n eg", 6 074 0.0, "otdr", 
60859,0, W,60851 r 0, 
"out - ,60737, 141* 

170, <r autd n .60343.0, 
"duti", 60835,0 
5170 DATA "res",52096.20. 
"retr, 60749,0, 'Vetn" f 
60741,0,^,51984.64, 
4l >la rt ,23,0, "rkT p 51968, 
16 p ft rica ,, l 7,0 h ,r rld , ‘ l 
60783,0," Vr' 1 ,51992.64, 
"rra*. 31,0,^,51976. 
le/Trta'MS.p/VrdT 
60775,0 

5180 DATA ir »t h l 52lG0,20 l 
"sla", 52000,16, "sra", 
52008,16, H srr, 52024, 

16."defw",-256,41 
5190 DATA "*",0,0; LET ii=h 
LET Ml 10}—ii 

5200 LET b=0: LET ba = PEEK 
23635+256*PEEK 
23636+4: LET n=l 
5210 LET cc = l: IF PEEK 
ba<>£34 THEN LET 
n=n-l: GO TO 5250 
5220 LET cc-cc+Ij LET 

ba—ba+1; IF PEEK ba~13 
THEN LET ba=ta + 5; LET 
n=n+l: GO TO 5210 
5230 LET t$(n.cc)=CHR$ PEEK 
b3 

524.0 GO TO 5220 
5250 FOR g^i TO 100: LET 
f(g)=g'l: NEXT g, LET 
fh=100 

5300 LET K0-0; LET k9=99 : 

LET p0=0; LET w-0 
5310 LET k=k0: LET p=pp 
5320 GO SUB 8000 
5330 GO SUB 7000: LETo$»i$- 
IF o$(l )-''*" THEN PRINT 
OS;: GO TO 5320 
5340 IF o$’='’end" THEN PRINT 
" end last addr 
5350 IFo$- 4, end M THEN LET 
P0 = 0: GO TO 9999 
5370 IF o$O n org" THEN GO 
TO 5400 

5380 GO SUB 7000: LET s=0: 


IF THEN LET 

s=p: LET i$=l$(2 TO } 
5390 LET p-VAL i$+S: PRINT H 
□rg "jp;: GO TO 5320 
5400 IE p=0 THEN PRINT "{you 
forgot orgr: LET p = 50000 
5410 LET pS=o$+ h r 1 : FOR 
f=l + 18*{Q*O r, ltn TO 
110: fF o$<=k$(i) AND 
p$>k$(i) THEN GO TO 
5500 

5420 NEXT i; PRINT o$ 

5430 IF i$(lJ = 'V’ THEN LET 
ii$=i$(2 TO ) 

5440 GO SUB 9000- LET 
KE^rig) 

5450 IF gg<=100 THEN LET 
s-SGN z(ggl: LET b=INT 
(AflS i{gg)/65536}: LET 
r-ABS 2{gg)-b‘6553&: 
LET q=F£EK r+256*PEEK 
tr+l)s PRINT " poking V; 

M with ";FN j(p*s-^q,8J: IF 


b THEN POKE (r+ll.FN 
j((p T s+qV256,8h PRINT " 
poking "ir+U" with ";FN 
j((p's+q)/256,8) 

5480 PRINT " (this Ime not 
recognised)" 

5490 GO TO 5420 
5500 LET i=0: LET r=0; LET 
e=0 E PRINT ” "joS 
5510 LET op=Mi); IF rn{i>^0 
THEN GO TO 6090 
5520 GO SUB 7000: LET aS = i$: 
PRINT " ";aS 

5530 LEJm=m(r>: LETop=k(i): 
LET b=FN b(m.0); LET 
b7 = b+2 Hr FN b(m,7)+i: 
LET 2=0: IF FN jtm,3]<2 
THEN LET c$=a$: GO TO 
5720 

5540 FOR j 1 TO LEN a$: IF 
aJ(j)=V THEN GO TO 
5580 

5550 NEXT j ; IF OR 


52 INPUT 





















oS**"rts M THEN GO TO 

s m 

5560 IF FN e(oS.k*(H-lI) THEN 
LET i^i+1: GO TO 5530 

5570 PRINT " {two operands, 
expected)": GO TO 5320 

55S0 LET b$=a$f TO j-lh LET 
c$«a*Cj+l TO ) 

5590 IF FN b(m r 2) THEN GOTO 
5650 

5600 IF FN b(m„7) THEN LET 
d$=cS:: LET C$ = b$: LET 
b$=d$ 

5610 IF b$ = r, ahr'(b+l TO 
tH-b+lJ THEN GO TO 
5720 

5620 IF bS="{cr AND 

OR oS-'ouH THEN GO 
TO 5720 

5630 IF [FN e£tJ$,k$(i +■ 1))1 AND 
(FN j{m(i + l),3)>=2) 
THEN LET 1=1+1: GO TO 
5530 


5640 PRINT ''(first operand a or 
hi expected) 1 '? GO TO 5320 
5650 IF FN b(m, 1) THEN GOTO 
5690 

5660 LET e$ = (b$+■'□□□■')( TO 
4)i FOR 1 = 1 TO 8? IF 
e$=rS{j.b7) THEN LET 
op=op+8 *H -1 )* (b7<4) 

+ 16 # £i-6)'(b7=4)'(j>3): 
LET i=(j-l)*'{b7™4)* 
(|<=3): GOTO 5710 
5670 NEXT ]: IF pS>k$(i + l) 

AND(FN j(m[i + l),3)>-2) 
THEN LET i-i + 1; GO TO 
5530 

5680 PRINT "(first operand bit or 
flag reqd) 1 ': GO TO 5320 
5690 IF FN b(m,7) THEN LET 
d£=c$: LET c$=b$: LET 
b$=d$: GO TO 5660 
5700 LET x-S: GO SUB 5750: 

IF e THEN GO TO 5730 
5710 IF e$ = H " THEN GO TO 
6090 

5720 LET 3b=l+I5*b+7*(op< B = 
6 AND op>=4 OR 
b$='Tc)"): LET b$=c$: GO 
SUB 5750= IF NOT e THEN 
GO TO 6090 

5730 IFe-2 OR p$>k*(i+l) 
AND FN J(m(i+1),3)«FN 
jfFN x(nv0>,3) THEN LET 
e-0: LET 1-6+1: GO TO 

5740 GO TO 5320 

5750 LET f—0: IF FN b(m,4) 

AND FN eCTE TO NOT b), 
b$) THEN LET i2 = FN 
erix n .b$(2-b TO H ,f 
M )+2*FN eny",bN2-b TO 
)+ M N )= IF t2 THEN LET 
i=z 2t LET e$=b${ TO LEN 
bJ-NOT b): LET 
b$= r ’(hl) 1, (l + b TO 4—bjr 
LET fS-"p''+c$(4-b TO ) 
5760 IF FN b<m,3) THEN GO TO 
5790 

5770 LET e$-(b$ + PI ")t TO 

Ah FOR j = l TO a/lb+1): 

IF e$=s$(j,b+l) THEN 
LET op- oi>+(f-V)*x: 
RETURN 


5780 GO TO 5810 

5790 LET [2=9+9*(pS =l 'ltl"): 
FOR J=j2—S TO 12: IF 
k(i)otfj) THEN GOTO 
5S10 

5800 IF FN e{b3,u$Ej)] then 
RETURN 

5810 NEXT j= IF b$= "ar THEN 
IF FN e( ,r p" P oW THEN LET 
0p=0p + 48: 

RETURN 

5S20 IF FN b(m r 6} AND FN 
e(T,b$) THEN LET 
t»S=b$(2 TO LEN bS-1): 
GO TO 5860 

5330 IF FN b(m,5) THEN LET 
op=FN x(dp+6 t N 0T b,6): 
GO TO 5860 

5840 IF p$>k$(i+l> I HEN LET 
e=2t RETURN 

5850 PRINT "(cannot match 

operand to op)": LET e=l = 
RETURN 

5860 LET f-65536 

5870 LET s= 1 

5880 IF b$ = HH THEN GO TO 
6080 

5890 LET x$=b$(l): LET 

d$=bf(2 TO ): IF x$=«"*’ r 
THEN LET r=r+p"S: LET 
b$ = d$: GO TO 5870 

5900 IF x% = ■'+'' THEN LET 
b^-dS; GO TO 5880 

5910 lFx£^''-’ r THEN LET 

b$=b$: LET S—“S: GOTO 
5830 

5920 IF x$= ,H 'THEN LET 
r=r^CODE d|*S: LET 
b$-d$(2 TO ): GO TO 
5870 

5930 LET q-0; IF OR 

dt< ,1 0 ,, OR d&>^"2'' 
THEN GO TO 5960 

5940 IF d$> = , '0 M AND d£<''2" 
THEN LET q = q’2 + COOE 
dS-48: LEI d$=d$[2 TO 
1: GO TO 5940 

5950 LET f=f+q*Br LETb$=d?: 
GO TO 5870 

5960 IF OR d$< M 0 ,f 

OR dS> = ''g" THEN GO TO 
5000 


INPUT 53 


















oi re re 

CD ce re 


5970 LET x$=CHRS CODE d$= 
FOR g=p TO 15: IF 
x$<>hj(g+1) AND 
x$<>g,$(g+lj THEN GO 
TO 5990 

5980 LET q=q*16+& LET 
TO ): CO TO 

59 70 

5990 NEXT gt LET r=f+q*s: LET 
bS=d$: GO TO 5870 
6000 IF x£<’ r 3' r OK *$>V 
THEN GO TO 6040 
6010 LET i$=b$; GO SUB 9000: 
IF i$o' Mh THEN GO SU8 
9400 

6020 IF rlgjO23000 AND 
r(gj>100 THEN LET 
r*r+(rt8)-100)*s: LET 
b^ = r?: GO TO 5870 
6030 IF r{gl=23000 OR 


r(g}< = 100 THEN LET 
gh=f{fh); LET r(fh) = r(g} ; 
LET r(g)*»fh: LET fh=gh: 
LET 2We)Mp+5GN 
op+CABS op>255) 
+2*(z>0)+65536‘{(b OR 
FN bSm.6)) AND 
0*<>'-jr ih »*s. LET bfc=i$: 
GO TO 5070 

6040 IF OR x$> 1| 9 1 ' 

THEN LET r-0; GO TO 
6070 

6050 IF b$>=''CT AND b$<V f 
THEN LET q=q*10+COD£ 
bS 43: LET bj = b5(2 TO 
3: GO TO 6050 

6060 LET rm+s‘q-. GO TO 5870 

6070 PRINT "(address nos 
undersized)'' 

6060 LET r=r-(p+2}‘(o$ = 


"djn 2 w OR o$=''jr M }: 

RETURN 

6090 PRINT TA0 L6;: LET by^p/ 
256; GO SUB 6190; LET 
by^fs: GO SUB 6190: GO 
SUB 6160 

6100 IF z THEN LET 

by= 189+z"32: GO SUB 
6380: GO SUB 6160 
6110 lFop>=0 THEN LET 
l>y=op/256: GO SUB 
6170: GO SUB 6150: LET 
by =op: GO SUB 61B0: GO 
SUB 6150 

6120 JF r=0 THEN GO TO 5320 
6130 GO SUB 6160: LET by=r: 
GO SUB 6130: IF (b- OR 
FN b{m,6» ANDbS<> H jr 
THEN LET by=rf256; GO 
SUB 6180 
6140 GO TO 5320 
6150 IF i AND I NT by AND NOT 
b THEN GO SUB 6160: 

LET by-VAL f|: GO SUB 
6130: LET z-0 
6160 PRINT lp V RETURN 
6170 IF I NT by<-0 THEN 
RETURN 

6180 LET by = FN jfby,8): POKE 
p,by: LET p»p+l 
6190 LET by = FN j(by,8): PRINT 
hid+INT (by/l6)):hS(FN 
j(by,4)+1): 

6200 RETURN 
7000 IF h>n THEN LET 
iS^'entT: RETURN 
7010 LET kl=k9+h IF 

k9>=LEN tSCk) THEN LET 
iS-"/missing^ 1 : RETURN 
7020 LET k9-Kl: IF t$tk. k 1) => H 
■' THEN GO TO 7010 
7030 IF k9>LEN tftfc) THEN 
LET i$=l£(JO{kl TO ): 
RETURN 

7040 IF tSCkpkSJo 1 ' '' THEN 
LET k9=k9 + I: GOTO 
7030 

7050 LET i$=l£0OEkl TO 
k9-l)r RETURN 
8000 IF k>0 THEN EF I5(k)(k9 
TO }>t${99) THEN PRINT 
tSCkM TO ): 


£4 INPUT 























8010 POKE 23692.0, LET 
k=k+l: LET k9 = 0 
3020 PRINT : RETURN 
9000 LET *&="“' 

9010 IFiS<V r OR 

THEN GO TO 9030 
9020 LET k$ = x$ — i$(l)- LEI 

\$=m2 TO h GO TO 9010 
9030 IF ISO** 1 THEN RETURN 
9400 FOR g=l TO w. IF FN 
efolzSteti Then return 
9410 NEXT g: LET w=vw+l: 

LET Z${w) = a$: LET g=W: 
LET rig)-23000 
942p RETURN 

r 7 — wgm — 7 7 =. —-* « 7 — ■ 

FUNCIONAMIENTO 

Hahrita Qbservado que cl programa 
ensamblador cmpiezii en 3a li'nea 5LK3U. 
Sc Face asi p;uu dejar siiio a cuh pro- 
grumus en Lcnjjuajc tn^amblador. que 
ban de inlroducirse coma venEenciaS 
REM cn las lincu del BASIC. 

Tienes que introductr cada instruc¬ 
tion en lenguaje ensuin'ibliidcr coma 
umi Hi 11 c a separuda, n Lina senEencia 
REM separadii y can Iclras; mmuseu- 
tas: no uses nmyufculBS. 

Antes dc cnsamblar el proar ama, 
tienes qua boriar una rnrui median lc 
CLEAR para que puedu ir alii lu co 
digtt mAquina. La primera ]inea de tu 
programs cn tenguaje unsamblHdur 
tlfbe ser algo pjirccuJa a: 

10 REM 0?g 32000 

320UI e:i la direction dc memorial 
Jondc empiezu el c6di gi • miiquina y 
natural me nte estara sobre 3a zona 
nlweada por tu borrado previa. 

Si ic Ee olvjda espctificar org. que 
es eJ origen. el cnsambladar se iui par 
dctecto a la poslctfin 51kHK) y aJJi sc 
qued-ani EU pnjijr.jinii. 

Se mil lean Ilk mnemoniaw carncn- 
te-- del ZSO con una eiccpdfin: las re- 
torncK comiiL-ianales. AI Trial de las 
rutinidV de lenguaje cnsamblailar del 
ZSO el irmcmdnico ret sine para ha- 
eerie vokr a3 cuerpo principal del 
programs l*ii cuSdijj.o maquinu. En rsie 
ensamblador funaomird el mncinti- 
nica m. 

Sin embargo, nlguruis veces puede 
ser que quierasi haeer un reiumoeun- 


dicion.nl. por e icmplom >tz. Esto sig¬ 
nifies: vokcr si el results Jo no es 
ecro- Con sic CEtsamblador deberufc. 
osar la sin tan is n<, tt I ienes que usar 
rts cn vcz dc ret en iodos las rclornos 
condicioruiles, c-- dedr, en cualquwr 
rctorno que contcngu ielras a conti- 
nuaddn 4c ret Para Eos rclomos in- 
condieiu miles. en Eos que mi lie urn 
nada despucs de ret, se tmuitieoe In 
forma ret. 

Si uEili/js iiumeros hesadeeLmules. 
debtit ir prccedidw del signo i- Los 
numtros cn hinarto debcrSn llcvardc- 
lame nn si^na c ', Ss dclante ck on n6- 
mcro no hay signo algunn. el ensam- 
tiladar lo considcrari como decimal. 
Cualquicr palatini que no sea un clj- 
mandu se considera como una en- 
queta. Evira el uso dc cosas muy pa- 
recklas y no miliees niimeroh. 

Lav pragrLimn*i esentas en lengunje 
ensauibladordebcn ftnalizareon /ft 1/ 
end. pam qnc cl cnsainblador sepu 
ciuindo tierte que pararse. 

Lint vez que hayas ledeado m pnt- 
grama en lenguajc cnsflmHador no 
denes mas que ejecularlo icctcanJo 
I RUM ! . con lo que to aparecerfl en In 
pantalLa un 3islado del programa —el 
CLkligo fuemr- y su equivalenie en 
eddigo mdquinn —cl a'idicii ubjeto—, 
AI mismo l iempo. dieho eddigo objelo 
es POKKado cn 3a memorin 

Si ahara (c das cuenlu de que has 
comeiido un error en alguna dc las II 
neas, pueJes lislar d prL^rama y edi- 
lar el lenguaje ensatnblador do 3a 
forma habitual. 

Una vez que estd cnsamhludu todo 
el OLhligo maquiiLa. aparcceri cn la 
paptallS 3a direccidn final tic la rulina 
en eddiga m^quina. 

Para ejeculur el proctuntil tienes 
qao ntilizar una dc las instrucciones 
que se usan para HaOer carter lot pto- 
gtamas cn cddigtl uiuquina coma 

RANDOMIZE USR. 

PftRalmaccnarcIcodiga ahjeia, ic- 

elcu: SAVE '■nambre* CODE dirct- 
cidn dc comienzo. niimero dc bytes. 

Nombre. es cl ciombre quo quicras 
darle tu u las rulinas. Debe ircnire CO- 
miLljs. La palabrtt tesetvmta COL>E 
informa a I ardenador dc que t ienc que 
aimacenar cl proerama byre u bylc, a 
diftrencia de un prugrumu en BASIC. 


que puede scr rcubkudo cn cualquicr 
parte dc I.J mcmaria. l.s direction dc 
Comic mo es cl orjgen del programs cn 
v^dieo mdquina. Pucdcs calcular cl 
mini era de bytes rcslnndo In direecidn 
dc arigen de lu direeddn tlnul y su- 
mando I. 

Tonto el cnsiimblndor coma el cd- 
diga fuentc sc puede 11 almacenar uti- 
lizanJo la iutLia normal de SAVE. 

Para eomptobar iu ensumhlndor. 
prueba u. ledcar e| prograna e n Icn- 
guaje cnsumbludor parn hacer i sera- 
Hioc. : haein la derccha. dcscrito anie- 
rionncnEc en INPUT. Bicn sea que lo 
cnsamblcs 31 mana o can 3tyudn dc iu 
ensamNudor el CLkli^o mdquina re- 
sultantc fieri: 


11 FF 57 21 FE 57 06 C0 C5 1A 
01 IF 00 ED B3 12 26 IB 
C l 10 F3 C9 

Onvers.i >|ui* ■. ' li-niM-ne cnsambl;i- 
dor ba dc introdocirse can leiroi tm- 
misailas \ no mayusculns. yu que cn 
L'usu ci>n Enino ul c nsumblador niH las 
reconneeria. Ahara ya puedcs prubar 
Ea rutina v ver cbmo fundana. 


LOCALIZACION DE ERRORES 

Cuando sc teclca un programa 
hirgn. coma d que aubamos tie ver, 
rcsulla muy dificTL no jnlroducir erro- 
rcs. LI error niLus come me csoEvidarw- 
dc introducir alcun valor de DATA 
Si reeibes un mcnsiije de error que ic 
diga ■-[JUT OF DATA-, comp rue ba 
Ills sen Leticias. DATA Can una Solo 
coma que Ec lulte. \ a puedes Ecner 
problem as, Si iu cnsamblmdar no tun- 
eionu a Li primeru nc» te desesperes. Si 
no eonsipues localizar un error, IN¬ 
PUT public-jni para ii dentro de poco 
un programs Ern/ailnr paru d Spec* 
tftan , que ie ayuduni a cneonLrar los 
errorcii- 

In progntma trazador presema cn 
La pantalla el mimcro dc la Lkiea de 
BASR' que cf.ca siicndo tjecuEada en 
cada momento. El irazadur que vere- 
mos presenu tamhicn'Cl numerodc lu 
vemencLa que ck!^ Men Jo cjccutada Cfl 
die ha linca. LI uso de cstas utilidadcfi 
cn umb]I del programa publicado haec 
que la deieccibn de ertoro sea tacit. 


INPUT 55 





















Entrevista 


HABLAMOS CON EL AUTOR 
DE «EL PUNKI OE AKI» 



- Caries Arbotro? 

Puts no, no |e oonozco, £Qui£n es? 

— HI Hulor Jc K:tinnn Kndrfj;ucz 
niula memos 

— £(jui(5n? ^El dc fas desvertfuras 
de un puttki tie akff 

— Sl hombfe. si, Eit; iiiiirtlu. 

— ^Pero edmo': 1 ^Esde aqui de ver* 
dad? 

— dat'd que sl r espahiiau. Que no 
tc cntcras. 

Cuando se habEa del soft espaftoj, 
easi irremcdiahlemiente se acabn enmn 
los protaponi sta& dc csta hipotetica 
eottversaridn. Fero r seamos sincenw, 
£.A que lc hernot, pillado? ,;A que sa- 
bfas pcrftctaimtnie que Hannin Rodri¬ 
guez cs uno dc los ultimos grandcs c?i- 
tusde censas. y sin embargo mn isnfus 
ni Ea menor idea de quidn ora au an- 
tor? £,Eh? 

Pun bien, si no quiem que eslu 
vuclva u octifrine, emonees quiais ie 
convcnga saber sabre Just Carlos Ar- 
boiro algo mas que nu nornbre. Para 
sansfacer tu euriosidad. nos fuutioi a 
huoerlc lima visits con umi Inrga lists 
de preguntas debajo del brazo. 


LA ENTRE VISTA 

Nos reel bid on Las ofirinas de 
FRBE. firma para la que aclualmedie 
iraba/a. rodeado por un sofisticado 
equipo con cl que no podEa ni sonar 
cuando realize 1 ! su primer piogiairu, 


Dcspu£s de las presentacioncs de ri¬ 
gor. msialtiinos nucslros arlilugios de 
lorUirn y comenzamos un largo inle- 
rrogatorio. quo se prolotigaria durante 
mas de unu horn. 

INPUT r Jos< Carko, ^cuittdc empe- 
zarie a rlrdienrte en wrin a la prognt- 
mucitin? 

JCA: Empcctf en el ooLcgto. hacc 
cualro o einco alios, progrsmando jui 
giiis educaiivus. Alcalde un tirrnpo, 
robaron todo cl equipo que mill tenia 
mos v no iuve mis remedia que olvl- 
darmc del lema por una lenipurada, 
b.ism que me compri un Spectrum y 
c mpeci n programsr por m i cue n (a. El 
a no paradn, despuesde un intensotrn- 
bajodiiranle lodo el verano, viola luz 
Ramon Rodriguez. Puede ctecirKC que 
l-^Ic fuc mi primer trubajo serin, T-.n 
cuanto to tcrmind, me puse cn oon- 
tscio eon r,RBE. Les guslti In idea, y 
antes de que pudieia darme aienta et 
piagrumu ya se esc^ba vendiendo. 

INPUT; Ks de suponer que, romn tn- 



56 INPUT 




































dus Itn Illinium pmgm mdora tpu lo- 
tWU0SeNiE , S|»&riu.quentiM3Eipacm, crts 

autodidacla. 

JCA: Pues sf. Apjttldi BASIC con 
Lin ZX-Nl y algunas re vistas, delaspo- 
■eas que habla emionees, pcro Lift lefi- 
guaje priirtl-o se mt qucdti pcqucno 
Fue ententes cuando Empecc a inte- 
resarme pyi algo rnisterioso quc se lla- 
mnba Cddigo M&quina. Me compre 
un 3ibfo sehn: d icma, y poeo u poco 
fni aprendiendo Como cnloncei no 
habia ensambladores, tenia que imru- 
durir las rurinas pokeundo pacjenie- 
nicnle. o usando lisiados REM, pern 
a pesar de III*, dificul tades pude seguir 
addante, 

IN PI T r Se que nu le jjusta habta r del 
[Lin j, pern la precinma es ohligodn: 
;,QttL- npinas de I u pfraterti? 

JCAf Supongo quo mdos Ids progra- 
m adores lenemos pc rfcci anionic a^u- 
mi do ell problem a Sahemns que lbs 
pi Was von personas que se apnove- 
chan impuinemencc de micstro ira- 
bfljo, y que cn hi msydrta de Jos chsos 
oil tic nun de su-s aclivjdadcs ilcgolcs 
mucibu mAs dine re del que nosotros 
ganamos. con nuestro csluerzo, peru 
no hay mas re medio qne aeeptarHo. 
Espero que con la nuevp Icgtsi&ciGn SC 
de on importance pa.vn adclance cn la 
lucha OOntra la piraterta, aunque csta 
rrltiv darn que eon. eso no basla, 

INPUT; ;0«c sdweidn propones tn 
para com ba tar la piralena'! 

JCA; Yo Cf£0 que SI dastrihui- 
duuLs bisjarnn Jos precis. his usuanos 
que ohora sc sen obligados ;l comprar 
copias piralBS por no poder pagar un 
original, camblorfan dc aciitud. A na- 
lLil: le im porta riu pagar un pooo mis, 
para obcener un Original, en ve/. de 
uiiii eopift do mala calidad sin ningunu 

g&rantit, El pmblcma es guc machos 

UMiarisos pieman que los program as 
baratoh son peore-s. t, que so calidad 
depends' del dancro que cuestan. For 
eso. esla solueidn sdki serin efcciivii si 
1 1 uJas las diflribuidoras se pusierar de 
acucrdo, y los usuarius supieiari eo- 
rrc&pDnder a3 eslucrao. 



(Sin dud a. uno de los, ulsjios mis 
dcsEncadns de la pcnBonslidad dc Josf 
Carlos h In modcstia- Lldgados a cste 
punto cn la convcrsacidn. nos co- 
mciitd. sin dnilc lit me nor importances 
a sus palabras t que eompaginaba La 
programaddn con sus csfudios dc 
C.O.U. v con cl atlcrismo. 

Anles de pasar a hablur de sus pro- 
yeetos. le hleimos algunas preguntas 
SOfrre kanmn RAddgllElt.} 

INPUT; fCdinn onclo En Eden de tu 
prognuna? 

JCA: La verdad es que nacid mucho 
I tempo aUSs, cuundo program aba en 
el colegio, El peraonajc entonces era 
mas alta h v mm no tenia macho que 
ver cou el actual. Mu* tarde lo con¬ 
vert! Cn mu pnnki jj%rp p pcr« (mal- 
tnente dcscche h idea. Mis programas 
syfren muchoscambios durante au ela- 
boracedn porque no si go un plan pre- 
sno, si no que voy incorporando ideas 
a medida quu se me van ocurtiendo. 
Dc eMii forma c\ produtto Trial cs mo- 
cho mis original c imagination. 

INPUT; Nns han llegadn stiw njue 
asegurHn que prepariLS un sensjicioin^l 
pregransa nmhicnt^da- tu la ciudad dc 
Vciteth,., 

JCA: Si, jx-iu por el memento no 
puedo deciros nada. 


INPUT: Anda, sebuennn, 

Dc^puds de unos minutos de stipli- 
cas y promesas, consceuimos arruncar 
de su generosidad nlgunos dalos, 

E! programs reproducird fie I men to 
cn sus csccnaritos Isis hkis pintarescoa; 
nnconcs dc la ciudad de Venecia 
f«hasta en sus mils minamos dclallcs-), 
El argumento se pi ante.) como un ar¬ 
cade de peReeueidn, antique tLtntbi^n 
habra a I go dc cstralcgia, FI protago- 




IN PUT 57 






















HARD-SOFT- 
ACTU ALIDAD 

PANTALLA SOFT-HARD EN 

GRANDE LA RADIO 


msta de h avcnlura es un apuesEO gn- 

i. m venedano, cuya misioni lodavia no 
CM* muy Clara. Sdforc el raid tic Idi 
personajcft lampoCO h;kv naito seguro, 
pc rev Jose Carlos nos eamcntb que 
probablcrrocnte habra un «corru»iJei 
■Lon mulctas* incord iando en algunas 
paiuallas, For otra pane, e] eompor- 
Ulmien[O de l0S fjersanajes seennda- 
iios. -los malas*. seri mtcligenle. 

. Que euftndo csuirti lisle para su pu- 
'Micaetfin? Probablemcntc no antes de 

j. i primavera a principles del verano, 
Esperantos con impacts neia. 

Afonunadamcjitc, durante la entre- 
vista, nadie Jcscuhrid la minincimare 
[otogrifica que uno de noxotros ocul- 
r.tha en la solapa. Cuando llegamos a 
la re Jaccidrt . eorrimiKS .iLnrpdliLda- 
mcnle a I latniraiorid j ntvs enLerramoK 
en el durante media lnua de duro ira- 
bfija con m&estra destBrlalada n rrtplia- 
dora. Las l&grtmas empariaron nues- 
iros ojjos: j;te manure Eas fotograffasll 

,Ah! No st l.o digit* a nadie 


Ataban de pubhcurSe en e] RcmO 
Unido cineo program as bnsgdtw cn 
las pcITcuJas mils taquillcras de los 
miirtiM rneses, todas ellas 
recieniemcnie estrenadas cn Espaiia. 
Se irata de LABERINTO. ALIENS, 
GOLFE EN LA FEQUENA 
china. HOWARD y SHORT 
CIRCUIT, que vtcnen a rniirse a 
I.OS GOONIES, TOP GUN, 

COB HA y varies litulos m&s 
apareridos duranlc las Navidadra. 
Fnrece qua las compafiias 
protlueiorsts de soft no quieten 
renuiK'iar a I 1il6n de Ids cxtlos de la 
pans a Nil grande, a peiaf de que 
Trrachos usuarios que no sc tiejan 
citgahar por un Situlo conocido 
em.pie7.an a eansurse Esperamos que 
pJOntO aeali-c la ratlu, y podiirtttM, 
velvet a ver originalidad en nuesiras 
peqLic ftus, partlnllas. ftjti Lramas y 
heroes incditi.iv 

****++**+ 


Desde Lace aliiim tiempo, la 
cadena COPE uene entitle rtdo todos 
Itss sAbaiLuh dc ditto a stele un 
programs dedicado al mundo dc La 
mtcroinformatica, con cnlrcvisias. 
concunure, dcscripcion dc novcdndcs 
en soft y hard, y una partidpacidn 
muy direcla de Ids oyenles. Como 
siempre, cn Lido ]o que a actual i dad 
se refieie, la radio esti por delanle. 
OjaEii cunda el cjcmplo. 

# *■* * * * ** * 

DOS CONTRA 
DOS 


Fosiblemcnte rtcuerdes aque] 
progrania de baloncesio qu,e 
tevoEueiOno lo.i juegoS tie ttma 
depnriivn, haee ya mis de un ano, t 
que sc llamsiha ONE ON ONE, E'uck 
hien, csLH a ptmlo dc aparccer cn 



EDISA {PptO de Stiscripcnones}, Lopes de 

Hoyos, 141 - £ 800 £ Madrid. 


;NO TE PIERDAS NI UN SOLO EJEMPLAR! 


SB INPUT 





























GUIA DEL COMPRADOR DE SOFT 


Es posiblc quc esle men L-ches 
L-n I'iiJla zilguno de fiitos I tin Eos 
quc, inviuiabknnentc, pncsidcn 
tod as tas IJseas .ill it dande las 
haya. La verdad ex. quc cs«» que 


riTULO CAUFICACION 

(i a 10) 


AMUR I AD 9 

FTRELCRD 9 

HEARTLAND 9 

GREAT ESCAPE 9 

FROST BYTE 8 

PYRACUSE 8 

STRIKE FORCE 

HARRIER 3 

ACE a 

PRODIGY 9 

PAPER BOY $ 

BACK TO SKBQL 7 

STAINLESS STEEL 7 

JACK THE NIPPER 7 

URIDIUM 7 

BREAK THRU 7 

CRYSTAL CASTLES 7 

ASTEHIX T 

FAIHUGHT II 7 

WAY OF THE TIGER 7 

AVENGER 7 

ARMY MOVES 7 

DRAGON'S LAIR 7 


liiliLin Zulu sipjcn cdscchaiufa 
^ilffli, pero dcspuds de un larjto 
sic gloria no queda mis 
rcmedio quc dejar paso a Las. 
novcdiidev Rl-] 10 l. li rse o mtnrir. 


TITULO CALIF 1C A Cl ON 

<i a 10 ) 


NUCLEAR BOWLS 7 

WINTER GAMES 7 

GHOST'D GOBLINS 7 

FUTURE KNIGHT 7 

RAMQN RODRIGUEZ 6 

COOKIES $ 

MIAMI VICE E 

MERMAID MADNESS 6 

LA JOYA DEL NILO 6 

HQCKMAH 6 

BOBBY BEARING 6 

NIGHTMARE HALLY 6 

STREET HAWK € 

EQUINOX 6 

FINS PONG 6 

BOUNDER B 

CAULDRON It 6 

COBRA G 

DYNAMITE DAN II E 

THANATDS 6 

TENNIS $ 

INFILTRATOR B 

MAILSTROM 5 


NOVEDADES EN 

CANDIDATURE 

DehpuCh de la jjrisn avahmeha de 
Mavtdad, pOca.H son las novcdlictcs 
aparecidan. Tamblir x«n pocos los 
IllulOh que liaii consi^guido pasar 3 
la imi ik gJtiKK. y pCir cllo 
programs quc a continnaeion 
Listamos repilen candidaium 

ALIENS 

TOP-CUN 

THEY SOLD A MILLION 
SUPER SOCCER 
COSA NOSTRA 
LIVINGSTONE SUPONSO 
DEACTIVATES 
HARD BAH 
TRAILS LAZE R 
EXPLODING FIST II 
REVOLUTION 
SILENT SERVICE 
BAZOOKA BILL 
HIGHLANDER 
SHORT-CIRCUIT 
TRIVIAL PURSUIT 
FAT WORM 
HACKER II 
CAN DARE 
LABERIHTO 

GOtPE EN LA PEQUEMA CHINA 

HOWARD 

DEEP STRIKE 


EspaAi TWO ON TWO. un 
sinutlador con cuuim jugaidores un 
pan (alia, donde lo que prima no es la 
accidn personal, si no el juego de 
cquipo Memos eisto odgwias 
indigenes en sn version para aim 
modclo de ardenadur, y nns Tin 
parccido an poco deficieme en 
CLiuntO li Ids grificOx, pern par el 
mumerilo no podfifflfl*. deciros mix, 

+ #-******+ 


CON LA BOCA 
ABIERTA 

Con la boca abierra sc han 
quedado los usuahns de Commodore 
Ml probar un program a qwe hari 
tiisroriu: WORLD GAMES (Jucgos 
del mundn). Todas las revistas 
briiinicas lian coimridido en itfirmar 
que III tlliima protiuccten de EPYX, 
comimiBCidn de la scric SUMMER 


GAMES'WINTER GAMES (Juego* 
de verano-Juegos de irtviernn), es Ui 
mis ecrcano a la perfection ofrsolula 
que se ha visin hnsla ahora en un 
microordenador. 

Esperanto* anhelantes que csit 
mnpnrrico juego dLsponibfe para 
Spectrum pronto, o La envidia nos 
eornftcrij Ins entrants. 


** + ***#"**■ 


INPUT 59 




















AVENTURAS Y DESVENTURAS 
DE UN PUNKI DE AKI 



Como hack Jocks las nmAanas antes 
de Siilir a la callc, meiiri Lo$ dedos en 
el enchufc y aguitnlii e&tricsmciltc la 
tksearga, Con aire preocupado, 
volvib su agujercado rostra hack el 
cspejo v sc t:oli>Ci5 Un imptrdible eu 
cl pirpado. mientrus hack es-FuerzOi 
HibrchuniUnOs por no mirar hacia 
flirib-n Pcsdc hack ya mucho 
ticmpo, los dosdentos vcimtc void os 
de la instafaritin de su casa Ee 
dcjahflft to* pc los cm pnco fliiccidos 
para su gusto, y por no echarsc a 
Jlorar preferta noverlos, Un buen 
amigo le hibfa recomendudo 
insislcrtte monte la ;ilu ten kin corns) 



DATOS GENERATES 

■ ■■Baa ■■■■■■■*■■«« a■■»i»ii»aiiliia 

TITLfLO R-andn Rodriguez 
FABRICANTE Er&e 
TEMA Un pinki en spurns 


3 ' * =» 


MI 


CALI F( Q AC I ON iSftSip IP pUE i 


solution a su problems. pent Rantdn 
era un chioo prude me v tompoeo 
querfa pasarse. 

Constat n ado pot l.i cstastc 
efeeiividad lIc su trial ul lfki 
iratamicnto capilsr, saiirt a la callc y 
Sc dirigpd hack la cenulia neo-punk 
de k eervecerfa BA SURA’S, donde 
It asiana esperondo l.i pc fin. Ekm de 
pronto, ruvu la ccrteza. de que algo 
murehaba ma|; jse kubki perdido! 

En esc p red so insiante, do* 
mon Htraosew gusano*; gigunteii Je las 
profundidadcs le ccrraron el p«so, 

Sin pemkrselo dos ve«s F nuestro 
aguerndo punki salid agilmente 
sobre ellos. con tan poca fortuna que 
fue a parar a un prof undo abkmo. 
Durante la cofda, tuvo la absurds 
idea de agitiir los hmzos coma un 
pajnrito ^por si acaso funebnn*. j 
para so. sorprosa. funcionb. -Cuando 
cuCntc csto cn el bar, me llevan a 
Atcohdikos An&nifrtirs - p 
Buscandn d mode dc salir de &qud 
mflemo, pa.so por varies sinos que Le 
resutlabnii fibCEiiliitrcs: el muro dc 
Beilin, TVE, cl Polo Norte... Por 


Wj-UMtrjri** **■***■****■***# + ****•#*'*' 


OmGIMAilllAII 
INTEfiSS 
cwiFigos 
COLOR 
SC H IDO 


TOTAL 


M 


— 




mils quo sc csfbrzaba, no lograba 
recordar tldnde los habia visto antes. 
Cuundo ya come rumba a perder las 
espn ranziisi. cnconlro varias Haves, y 
alj-cj Ec bizo sospcchnr que tenian 
nkuna relaeidn eon k soludbn dd 
enigma. ^Cuil? ^Quieri sabel 



GAUNTLET 


RccEcntcmcnlc, U.S.COLD ha 
pubhciido an nucstro puis la version 
para Spectrum dc GAUNTLET, una 


cei las mSquinas tragaperras de iodu 
d imioJo. 

EJ objeto del juego consiste 


mayor tiempo pustble en el interior 
dc on laberinto, enfrcnlAndosc u los 
monstruos que lo puehlan. Ejciaen 
ires tipos distinlos de armas. eon 
dtferente g.fido de efeetividad: las 
arm as arrojadizas, a® conjurtw. y las 


de las vidcoaveniuras dc mayor exito simplemcnte en sobrevivir durante d annas dc combate cuerpo a cijer|TM.!i, 


60 INPUT 






































C&da una de cLEas sera especial me nlc 
poderosa contra determinados 
ob^tijiciiilos o enemigos, y poco 
efecliva si « emplea so It re objetivos 
inadeeuados. 

Una Jc Iiels c&racierEsiicas mas 
mnovadoras que presents d 
programa, ths Lit posibitidad do que 
pankapcn simultAncamcnte en La 
avenCur.i dns jnjjadeires.. Eiidn sea ton 
el joystick o con d tcdado, guiundo 
a persona jcs difcrtnlcs. Antes de 
comcnzar cE juego., ticnc Lngar In 
eleccton dd hcroe bk L puede cscogcr 
entre cualro penonajes, catla uno 
con sus propias caiactcristicas: Thor, 
el guerre ru. pOWe Unas dotes 
CKlraordinjirias para el com bale, 
pero sus poderes m&gicos son 
escaiQfi- HI Mage Merlin, ett eambio H 
csta indlcfensci en la India uuerpa a 
cucrpo, pero lEerie grandcs poderes 
sobrenatu rales. LI elln Qucstor* y la 
amazona Thyra, poSeen aptitudes 
tanlo para el combate como para la 
itiagiu. peru rtiiigurLo dc sus poderes 
destnea cspttialmcnte sob re Ins 
demits. 

F’.it.i terminal, os diremos que 
GAUNTLET es un arcade en su 
e si ado mis puru, una tspcof de 
ibredns is de aedd n, reOnme ridable 
a todos aqucllos que gysten Je poncr 
s prueba sys reflejos con un 
programa trcpidantc 



DATOS GENERALES 

TITIILG Gauntlel 


FABRICANTE U S Gold 


TEPiA Arcade 


- tPJ 

CALIFICACION [Sdm 10 p em i 

afllGl HMIDftD 

i 

IMTERJES 


MflCtt 

« 

eaten 

6 

SMUG 

7 

imii 

33 


- 



********************* ******** 


LOS GOONIES 


Como ya habnte athvinado, sc crata 
de la version para micro dc la 
pelfetita del mismo narnbre, 
pitiducidi! pnr Warner firm, en l H JSrt. 



y dingida por uno dc los grandcs 
maestros del dile de Imuasia y 
avettt Liras, Sieve n Spiel hers. 

Rn I me as gencrjilcs, tl argumcnlo 
coincide fielmenle con cl lema 
original dc Eu pellicula: 
l,o pandill a do I os <i cm inks sc 
cncucnli.ii en una siluacitki diffriL 
Sus faniilias van a ser desaEtticiiidns si 
no rclinen promo unu gran snma de 
dindro para pagar las hi polecat, y Ja 
uriiira frlfima Je dunscguirlo en 
encomraiido el [ebOru perdido del 
Firala Tuerto, Desgruciadamente, los 
icmibles hermanos Fratetli trataran 
de inlpedE] por rodDs los medius que 


Ins Goonies alcancen su nbjerivo. 
Ademas, el tamino que [endriin qve 
recorrcr cstani sembrado dc tram pas 
y obsticLilos. y poblado por seres dc 
las profundidsides, conio calaveras 
volantcs, iniLrcidlagus ascsinos, y 
pulpus giganies. 



input si 


































En todas Las palilalias habran dc 
tolaliOrai dun tjQOftieS junlm para 

resolver el eni^ifla y Lominuar la 
avenmra. Cada vez que picrdas lino, 
orro oeufuirA sli lu^ar. hasta que iu 
rctcrVa dc Goon res sc aqolc y tenters 
que empezar tie nuevo. 

Pern debt! rnos merten/mar dot 
atpeelot quo no nos ban jjuslaJo. 

EL Ttiirncr-O lIu parti al ias us nun 
rcdtl-cido (echo on total). y cl grado 
tic dificullad cs (an ha jo. que Sena 
Lin crimen sugerir alguna pistil. 

No nhstanlc. desde otro punto do 
vista sc pod nun saiorar 
pOiitivamrnLc am bos aspect 0$. sabre 
todo leniendo on lUl iiUi que a 
machos bsuario.i no Let gustu timer 
que romperse fa cabcza pcnsaTido 
para resolver un juegn, o que Los 
mis peqtidias lamtuen lienen 
dercchn a podcr term i tier por si 
mismos la aventura 


DAT 0 S GENERALES 

TITULO The Goomes 

FARRICAMTE U S. Gold 
TEMA Avenluras 



CALIF ICACION i.Sotnu hi k<k t 


□RICH KfillDRD E 

IITISSS 7 

CHJtflOB 7 

CDIOH ? 

sorit&a * 


TBTftL 33 


** + *+■+ + + -** + ** + + #* + + ** + * + * 


INFILTRATOR 


Telegrama urgente pura el eapitrtn 
Johnny ■HJimbty-Baby.c McGihbits. 
iriiis conocido como lnfiLlnuur: 
Astinlo-— El lider loco del pais 
vccino viielve a hacer dc las suyas, 
fiNeocsitamEis in nyuda. Jimbo.* 
«£dlo un pLLalo dc hdiroplcTO. 
CXpcriP en balls ika, ingemcro, 
ncurodnJ|Einb. polflico. actor dc 
cine. estrella del rock, molociclista, 
emturdtt negro de klrate, y no 
guaperas como lu, puede salvar a I 
nrmodo.* 

•May qua de inner al loco a cualquicr 
precio.ip 

•Whizbang Enterprises not ha ccdido 
amablemente d ultimo proiotipo del 
super-ltd ictiptcro-turbopro pu tsado 
Gizmo-DHX-J. Con el dchenis 
infiltrairte ell Lat bates eriemigas para 
eurnpllr las rtiLSra-ncs que Sc tc 

iLsiguen."- 

«Para facilit arte lascosas. (e 
enviamus una edition dc bolstllo dc 
la u Gufa McGibbits dc La infiltracLdm 
en intialacloncs lemsstres", j un 
cuaderno con todos Los detailed 
referentes a la operation.- 



«jSiaerlr. J 

En linens generates, podemos 
aftTmar que el program® eumplc 
[Cuius Los requisites esencialct para 



meieccr una opinkin muy favorable 
por rtuettru pane. No obstante, 
debemos scnalar que la version para 
SjT-eulrum presenla muchos atpeCtos 
negaihus Uetde cl punto de vista 
grifico. espcdaEmenlc si la 
compammot con la que en. su dta sc 



62 INPUT 













































hizo para Commodore. Todos 
epcribamo^ que sc sacara mucho 
mils partido a In version original de 
Infiltrator. pero eomo suele ocurrzi 
en estos casos, los resukudos hurt 
•stJo un pos'd dcccpdon antes. 

S-o (ilsslHrtlc quedartltis ,i Li esptra 
Ac que en un fuluro ccrcunu 
■\;jckosolt nos sorprendu gratsmente 
L'i'n Dirt) personaje, antique n,r> sea 
[an pnlifacttico eorno csle -LElfiti ration 


****■****•-**■* + +-* + -* + *** 


LA GRAN EVASION 


Poco antes dc que la gran avalancha 
nuvidefta tnundaia, el mercado, 

£ ICEAN presenrO cn Espmsa un 
programs que, desde entonccs. no ha 
bajado de los primeros puestos en las 
hstas. de ventas, eonfrcnatido am el 
Ii»turtik' £*i|o obtenido cn Jng|»lerrn 
Se Irani Ac I NK GREAT KSC APK 


f;\PKRTfJ I S IKtAS 
Pocas son los qne puetlcn presumir 
v ha her pass do unas agrodablcs 
.iiftifiuncs en tin campo de 
iiricenlraci^rt ale ruin JuraiHC la 
S;gmtJn Guerra Mondial Evta 
jvcnlura tram la sorprendemu 
historia de un ajitinimo cnpitiin dc 
inicndettcia, cuyo nombre pooo 
mpofia, que no sOlo ha sido clients 
■sidrio de los peores campos dc 
prixioneros de toda Eufupa. si no que 
-.iltmis Oienia cort cl irtSi LmLlurttu 
hislona corns* Mptrtocnfups. 

Deques de numerosos interims de 
lugzi y varies uaslados. acabd Jan do 
con sus molidos hucsos en lieu viejo 
castillo Bustriaco, habilitado coma 
piisirin Je maxima seguridad durante 



In g.uerra. Corrin el ano 1912, 

El jete ;d ttiarido en aquel nuevo 
campo de irueinairtjemo era un 
remilgado oftcial pmsiarto, que tenia 
pe>r costumbre irrumpir por sorpresa 
cn los lugares y mo memos mis 
■noportunos. ereando no pooos 
problem as a qutenes prepare ban 
alisuna fuea En su desmedida afiridn 
per la discipline y el orden, habia 
impoiesto desde su 11 egad u un horario 
de actividades tnuy cstricto, q dr¬ 
aper] as dejaba ralos hires. For si 
esto fuera poeo, reforzd la plnnitlln 
hast a cofiiegiitr que iubiera un 
guardian por euda prisionero. y dio 


DATOS GENERALES 

§ !'■>■.■■■■■■■■ b a a ■ i a Biki*iiia ■ ■ ■ ■ a a 

TITULG The great escape 

FABRIC ANTE Ocean 

TIMA l-Lqa del car pa de 
concentre ci6n 


LLLl.V|:l; 


a 5* i! & £ ii & 




CALIFICACrON mi ; 


DniGlhAUDAD 

INTERES 

EUftFHSK 

to La s 

SGHIQu 

|mmmmirnmmmmmi 

TDTU. 


10 

IQ 

g 

r 

T 

i 
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drJenes de que se castignra 
sescran’ienie a xodo aquel que sc 
siiliera de la rucirtu del campo. u 
abaridcjnara Li.h zrcliviJades 

obltgaioriiis despues tkJ loquc de 
sirenn. 

E] rccinlo cstaba ioJchJo por ima 
alambrada JobLe, con torretas Je 
vigilarcia insialadas ert ioJos |t>s 
Angulos, y numcrosos grmrdias 
patrullaodo cn las inmediactones, En 
3a [sarte esterior del penmetro, 

marl ifqrtH perron adiestiadOs pdra 
Jescuartiicar a todo prisionero que sc 
les pusient por dcluntc. doban iuena 
cue run de los pocos que se atrevian a 
inlentar la fugpt. 

Sblo un plan audaz e imaginativo 

podriA tener una remota posibili-dad 

de £xito en un inliemo ciimn aqutl 
La UTiicdi vcnlaja ton que sc podia 
pnpuor, era ii e^istcncia de una 
unportiinle organi/aciiift internu 
desiicada a |:i preparacinn Jc fugaS. 
Gracias is clla. no era muy difitil 
obtener hcrTnimicnTiss, distTaccs. 
documentor falsiBcados, y todo eL 
material necesario para la huida 
Ademas, la GrurRnjo enviaba 
peribdieamcnic paquetes que 
oeullaban ^ratas sorpresa* en sus 
Johles tonclos. 

. Cuando nucsiro sofrido nenperto 



INPUT 63 



































cn t’ug&s tuvo notifies Jo Ins timdes 
qute compSfieros h;ihi;in 
construido, supo que cl gran 
momenta iL.ihin llegadu 

EL PLAN 
Primer din: 

Antes dc acudir a la formacidn para 
pa&ar lista, rcco^ib mi paquete de Li 
Cruu Raja Clt cl tkMiqULn. Can 
satiStSCtibn cOhiprobb que canttnia 
una hfllss con cast twin lo ncccsarin 
para la fuga. Despuds del desayuno. 
abrid con la Caveroja la puena dc 
acceso a las habitat iones del ah 
Esilt, dande enconlrt'? la liritermi. Ail: 
dejb hi Have, pues subiu que no 
podia llcvar simuitaneamente mas di 
Jos objeios, y se nurdid 
itprcSuradamcnEc c^n la lintcrna y la 
bolsn cn su pndcr, Cuando voSvhS a 
ui barracan desputSs de kre ejecctcios. 
In ehLinldio todo ert la enErudiL lie I 
lu»d uiiu yj LjUC ]N>r ulh realign a Ij 
fugA. 

Kegundo dm: 

Satiri al patio y bused la Have verde 
junto a las pittas dc Lira de las 
lorrctas Con cl la lngr« entrar cn cl 
ulmuofn. para oogcr las herramlentas 
que k pernutirian abrir la puena 
cum ip ua, donde se niconlrabii In 
pul :t Cogid &sla r y volvid a I nine I 




pnra csconderla. Mas lardc, cus* 
olvida recover de nuevo el paquete 
de la Cm? Roja. que en csia ocasidn 
contcnia una herranuenta 
imprest mdible las linaHts. 

Terce r dta: 

So ahurrio rnuchvi esperando sin 
rada que haccr a que llegara el 
paquete del cuarto d£a. bn toda la 
jornada- sdlo iuvo que rccoger U 
pastil fa dtehocotfltf qUf k r cnvi6 la 
Cruz Rt)ja y esconderh, para evitar 
que la volvieran a enviar. 

(’Lbartn rlia: 

Al abnr su pique ie. cnconlrti el 
insli miieui' ■ itiiis pieciailoE la briijula. 
Ya tenia todo lo necesario. 

QuiMo dial 
Comic iua la huida, 

Usando la lintcrna para ilumimr las 
Valerias del itinel. paced hast a cl final 
del reixirrido, domic se eueoiicto con 
un inoporteno derrumhe. Pesputs 
dc limpiar Ins cascntcs y despejar d 
pa so (gracilis a In efica/ ayuda dc In 
pala). volvid a por la brujula y la 
Nil mi. uumMs oh jet os neeesarios pura 



resist:ir In fUga coil esito. SliNo :lL 
campo de ejercidoS y rorld t:,i 
alambrada con Isis [cnacas. DcSputs 
de de/ur la brujula escorvdida fuera 
del eampu, vuIvjo ;t enirar y rcpiiiti 
hi opLTiifmn llernrtdo COrtSiga Ll 
bo Isa, Una ver que logrb estar 
■ ilucni con los Jos objetos 
primordiales, corrid todo So que 
pndo alejurtdose tie] campo. La fug it 
b.ibia sido un exito... 

. .Deapadadarrteme 4 unos meses 
despudn fue capiurado mient ras 
inlcrtaba sedueir u unu uldcana 
cirolesa. y conducido dc nuevo.... 
Supnnemds que pink urns ithtirrarii', 
d rc.Hio. 
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UNEL1 l 
FERROS 



1 

1 

J 



1 
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j 


[ 

i 

_ 
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HAVE ROJA PAQUETE 
CRUZ 
ROJA __ . 

iBOTIQUlNt®^ + 


TUNEL2 


PALA 


]• 


0~w 

LLAVE 
VERDE 


TUNEL2 


W * V n W > 






UNTERNA 


HERRAMIENTAS 


ALMACEN 
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CAMBIO €-54 con cabins, fuunlc da All- 
mentaddn, DATASSETTE especial,. 4 li¬ 
bra* SObri S» BASIC iff I Commodore,. 
300 juegos □□merciaJes, Joystick 
QUICKS HOT II, rN TER FACE. CGPlADOR 
¥ It fevistas. todp en perfecto estpda 
pgr Lin AMSTftAD con monitor in* 
etui do. Liamer al £94] $7$ 0? £5 de 8ij- 
fcaia. pregunlar por Inigo 

VENDO Spectrum Plus, casseire inter* 
f&ca y Joystick, rrOs de &0 revistas, mu- 
chos juegQ-S, libros SObre lenguajes y 
milioades dal Spectrum. Prefi&ro van- 
da rio Lodo an blogue. Jo an tynacio, 
Gods Basierr echos, c/ Ntra. Sra. dal 
Carmen n." 15. 2SC39 - MADRID, Telf.: 
[SI) 270 12 25 ■: H a mad as da 15,00 h 
has;a 22,00 h). 


CAMBIO joegos per* Spectrum Plus. 
Tango muefoos v buerws. Sblo para 
gente da MADRID. Interesados mandar 
lists a; Andris Rubro Samos, cJ Ribera 
del Manzaneros, p* 111, 2, u D. 2GO0& * 
MADRID, Telf,: 54219 83, 


VENDQ Jos n u meres d&l i al iSmtlmdo 
el extra de rarano de INPUT SINCLAIR 
a bian camb;arias por sus equivalents^ 
al MSX. £Totfos por 4.000 ptas.'l Jorge 
Lucena Luque, Barrie Sen Jose obrnm, 
blq.. 43. t" 2‘ TeH. 34 21 95. Reus, Ta¬ 
rragona. 


INTERCAMBIO juegos y prpgrsmas 
para ZX Spectrum Plus o 4BK a litre 
otros [Movie, West Bunk, Dynamite 
Dan. Phantomas IL Spincfizzy, Com* 
mandlQ. Sky fox, Amazon, Tommy, 
sic.). Jaime Martinet Vans clash a, e/ Co¬ 
lon, 27*2,° JG24Q Cartirt. Vabnd&. 


VENDO juegos de Spectrum 15 fWT 
1 SOD ptas. cade uro RalJie, Asterix.,, 
etc. Jose M, J Qiivora, TolL: 373 36 23. 
Manresa. Barcelona. 


INTERGAMBIQ urogram as para a I ZX 


Spectrum. Escribir a; J. Carlos Martin 
Sanchez, Restaurants Gran Sember- 
nardo. TelF.: £98£) 72 59 49 p 72 4Q 07. 
Palencid (340Q2I, 


CAMBIO C-64 con cables, fgente de ali- 
menTac>i6n. DATASSETTE especial, 4 |J- 
bros sobre el BASIC del C-64. 300 jua- 
gos cbmcrcialus. Joystick QUICKS HOT 
H. Interface Copiadory lbravisras, todo 
en perfecto ostado por un AMSTRA0 
can monitor. Llamar al telf.: (94| 676 
02 55. Btrkaia. Pregunlar por Inigo. 


COMPftO el rirtflo de COMMANDO 
para el Spectrum. Predo miximo 500 
pjas, Manuel G-arei'a, tf Sr, de la Humii* 
dad, n„* 17. Marchena S&vitia. 


tNTERCAMBlAM:QS ideas, irutrucci et¬ 
nas, mapas, fuages. etc. Prometemos 
comaster lodes las canas. Campramps 
las inslruccioiics det Baaddopy. Abste* 
ngrse de escribir ios »vendedores de 
prcgramasn. Club Pot< Soft. Bda/Torte- 
SotO, c/ Triana, 4. Jerez de la Frpntera, 
CAdiz. Telf -: (3661 32 12 34. 

CLUB E.C.3. ise ha forma dp en Barce¬ 
lona] abarca Speclrum, Commodore, 
Amstrad y MSX Irttoreasdes «SCf ibir ef 
spdo. de Correas, de Barna, n. n 2309. 
C.P.: QBQBQ (indicando Ttiodela de Or* 
dona dor) a llsmaral £93) 309 &6 &2. Pm* 
guntar por Angel. 


INTERCAMBIO ]U&g05 para Speclrum 
(rovedades) <4M pias. negociables). 
Gauntlet. Super Cycle, Army Moves, 
0 IC. LI am a I 1 al tcir.: 47 65 65. I Si lo zona 
do Valladolid capital.} 


VEMDO Spectrum 4BK, can cables, 
trgnsforrnador, dm a Horisgntis, revis¬ 
tas, joystick, interface y mis de cm* 
cuema i u egos. TodO por 23,OM ptas, 
Radi Pajarfn, c/ Padre Marcel Ian KASAN 
b r 1." F. Zaragoza. C.P, 5M15. 


I NT E RCA MB 10 programas para el ZX- 
S peel rum, escribir a: Juan Carlos Mar¬ 
lin S^ncKez. Re si au rant© Gran Samber- 
nardd. T Q |f. ; mSfl|72 59 49 a 72 4EJ07. 
PalenciB 134002). 


VENDO Spectrum Plus con casseite, ia- 
piz optica y las juegos: Kung-Fu Pias¬ 
ter, Abu Simbtl, Glicisl Buslers, Bounty 
Bob, cables y manual todo por 19.0&Q 
pEas. Telf,; 22 24 B2- Terragana. 


INTSRCAMBIO iuegos ultimas rCivOdO 
des 960 juegos, Ricardo Foriea. c i Con- 
Cftpcibn Aronal, 15-1.* izq. Miranda de 
Ebro. Burgos, 


VENDO Sn eel rum Plus, poco usa. 
Tronsformador, cables die conexipn. 
cinle de demustrecidn, menuaE en Cas¬ 
tellano. Incluyo un casselln gr^bedor 
Sanyo (estiio poriodtsta) pjlas y co¬ 
rn ante, incluyo iranslormgdar del cas¬ 
sette. Un jaysliefc Quick Sbal It can su 
Ini erf lire Kempstan, un late du 10 tin* 
ids dn Judges can progromos onginalcs 
y vorios reyistas complotamorno nuo 
yas. Todd por 4B.0D0 ptas, Joseba Don* 
ney, ci Rontegui 5.4." tichu. Berakatdo. 
Vizcaya. TalL: £94)437 13 25 o 

438 GO 12 £m ananas). 


VENDO Spectrum mas joystick Quick 
Shot l'l. inlerfaces K,empstan y progra- 
mablo, manuales en ingles y casleiiano 
y un libro sob re el Spectrum. Por 
25-001} ptas. L In mar a Daniel Costa 
Rcya. TefL: 133) 303 25 69. Barcelona. 


VENDO ordenador Spectrum ZX Plus 
mis cassette e interface lipo Kampalan 
tado par 27.000 piss ; ademis regain 
;negus. Me gustaria 'ponseguir ur> en* 
sambiudor y desonasmcladon lengo 
para camhiar programas comp. Paper 
Boy y Ghos Goblins. Javier Vega Agu 
rre, c/ C&rvfinr&s. 29-2* H, Molict del 
Vallis- Barcelona - OGtOO. Telf.: 
193) 593 G5E9. 


AVISO A LOS LECT0RES: 

Ei interesante programs de tratamiento de textos, cuyas 
dos primeras partes se puhficaron en los numeros 14 y 15 
de INPUT, se terminara de publicar, con la que sera la 
tercera parte, en el proximo numero. 
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